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APRESENTAC&Q 

Quern canpra un aparelho utilitario normalmente deseja fazer uso 
anplo e imediato do mesmo. Is to d mais valido quando se trata de un 
microcanputador pessoal, que, diga-se de passagem, de pessoal mesmo, 
estritamente, so tan o name, pois qualquer deles, com um miniroo de 16 
K 1f bytes" de memoria RAM, encontra aplicagDes profissionais incontesta 
veis no lar ou na empresa* 

E exatamente an consequencia da amplidSo de suas possibilidades 
e de sua multiplicidade de recursos, exige, ao contrario de outros u- 
tilitarios, um conhecimento sempre mais profundo e atualizado da ma- 
neira de explora-lo adequadamente, para seu dominio total e perfeito. 

Seu universe de aplicagOes se amplia inexoraveImente. A cada dia 
novos recursos para sua utilizacSo s2o descobertos, gracas a milhares 
de incansaveis e apaixonados usuarios e estudiosos que procuram sempre 
obter o maxim de rendimento dessas pequenas maravilhas. 

De forma geral, o fabricante nJo se preocupa em ir incorporando 
ao manual de uso de seu produto informagOes adicionais sobre novos u- 
sos e recursos descobertos, de tal sorte que a maioria de tais manuais 
se toraa desatualizada. Por outro lado, alguns s2o mai traduzidos ou 
mal redigidos, tomando-se pouco inteligiveis« 

Surgiu desse fa to a ideia de compilar IK 85 - DC^HNIO RAPIDO, um 
manual que possa se tornar um auxiliar efetivo dos usuarios de micro- 
computadores da linha SINCLAIR, em especial do IK 85 e CP 200 S- 

Acreditamos estar faltando um manual que, por sua praticidade e 
facilidade de consulta, constitua-se numa fonte organizada de informa- 
gOes, dados, tabelas, programas e dicas de acesso rapido, ao lado do 
computador ou on cima do joelho, naqueles mementos em que surge a ne- 
cessidade de um elemento chave para a execug2o de um programa ou de um 
estudo e em que nSo ocorre a iremoria a solugSo. 

A ideia, enfim, e colocar a disposigSo do usuario de microcompu- 
tador elonentos que o auxiliem a atingir mais rapidamente um bom grau 
de dominio de seu aparelho, para sua amp la utilizag2o no espago de tern 
po mais curto possivel apos sua aquisig2o, 

Um ligeiro exams do seu indice permitira sentir esse proposito. 

Esperamos te-lo atingido plenamente, para completa satisfagSo de 
seu possuidor. 























06 CCMANDOS - QU INSTRlKffES - DO IK 85 


Os comandos - ou instrugSes - do IK 85 foram estabelecidos em 
linguagem BASIC, a linguagem de computag2o de maior proximidade com o 
ling ua jar hunano, cm ingles* Quando postos em execug3o, os coinandos 
passam pelo dispositivo interpretador do raicrocanputador e acionam os 
circuitos eletronicos especificos a cada ag2o ordenada, fazendo com 
que sejam desempenhadas as fungSes projetadas para o aparelho* 

Os comandos do IK foram agrupados por nos segundo sua forma de 
atuagSo, de maneira a facilitar a ccmpreens2o de seu funcionamento e 
tomar sua assimilag2o nais rapida* 

0CMAND0S IE A£&) DIRETA 

S2o aqueles que so podem ser acionados isolada ou independents- 
mente, n2o sendo programaveis, is to e, nSo podem ser colocados cano li 
nhas de instrugSo em programas, para execugao. 

(XMANDOS EE AgSO DIRETA E/CXJ PBOGRAMAVEL 

S3o aqueles que podem ser acionados independentemente ou atuar 
coco instrugQes especificas em linhas de programas. 

COMANDOS DE AQ&) APENAS PRQGRAMAVEL 

S3o aqueles que so funcionam como instrugSes especificas em li- 
rihas de programas* 

Una tabela de todos os ccxnandos do TK 85 e apresentada na pagina 
seguinte. Suas fungSes ou atuagOes s2o descritas sucintamente e com an 
tecedencia aos programas em que s3o minis trades, no capitulo BASIC SEM 
RODEIOS, oxide s2o introduzidos sucessivamsnte, com uso exemplificado 
e com comentarios elucidativos* 

As paginas on que os coinandos s2o introduzidos est2o indicadas 
na tabela, de maneira a facilitar sua localizagSo para consultas* 
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1ABELA DOS CCMANDOS DO IK 85 


CODIGOS DE REFOR3AGEM OU INDICADORES 




A5&) DIRETA E/ 




ACSO DIREIA 


CD INDIRETA 


ACSO INDIRETA 


BREAK pg. 

. 23 

CLEAR pg. 

28 

AND (S) pg. 

38 

CDNT 

24 

CLS 

24 

AT (S) 

18 

EDIT (S) 

29 

COPY 

62 

CHR$ (F) 

43 

FUNCTION (S) 

33 

FAST (S) 

50 

CODE (F) 

36 

GRAPHICS (S) 

45 

GOTO 

22 

DIM 

54 

NEW LINE 

15 

IEN (F) 

48 

FOR 

26 

SHEET 

16 

LET 

26 

GOSUB 

24 

RDBOUT (S) 

16 

LIST 

19 

IF 

32 

$ $ O =i> (S) 

38 

LLIST (S) 

62 

INKEY$ (F) 

36 



LOAD 

62 

INPUT 

32 



LPRIKT (S) 

62 

INT (F) 

32 

FUNgOES MA3EMATICAS 

NEW 

15 

NEXT 

26 



PLOT 

38 

NOT (F) 

35 

ABS (F) pg. 

108 

POKE 

56 

OR (S) 

36 

ACS (F) 

113 

PRINT 

15 

PAUSE 

24 

ASN (F) 

113 

RAND 

32 

PEEK (F) 

56 

AIN (F) 

113 

RUN 

15 

REM 

24 

00S (F) 

113 

SAVE 

62 

RETURN 

24 

EXP (F) 

110 

SLOW (S) 

50 

RND (F) 

32 

IN (F) 

111 

STOP (S) 

24 

-SCROLL 

23 

PI (F) 

111 

UNP1OT 

38 

STEP (S) 

40 

SGN (F) 

108 



STR$ (F) 

48 

SIN (F) 

113 



TAB (F) 

19 

SQR (F) 

112 

ESPECIAIS (Ag&O 


THEN (S) 

32 

TAN (F) 

113 

INDIRETA) 


TO (S) 

26 





USR (F) 

58 



" " (S) Pg. 

17 

VAL (F) 

53 



, (s) 

20 





; (S) 

20 



/ _ \ m - * 


0 (s) 

108 




(S) = Acionaveis simultaneamsnte com a tecla SHIFT. 


(F) = Acionaveis apenas apos o comando FUNCTION ser ativado. 


SSo codigos que aparecem como notagftes no canto inferior esquer- 
do do video, indicando situagSes ou estados do ndcroccmputador face a 
instrugSes de programas ou comandos feitos. 

As notagOes aparecem sempre na seguinte configuragSo: NCMERO OU 
IETRA DO CODIGO - BARRA - NOMERO DE LINHA. 

A seguir os codigos comuns e sua significagSo: 

0 - ExecugSo bem sucedida. 

1 - Existencia de instrugao NEXT sem definigSo de variavel de 

controle. 

2 - UtiiizagSo de variavel indefinida. 

3 - Utilizagao de variaveis subscritas fora de faixa. 

4 - Memoria insuficiente ou esgotada. 

5 - Falta de espago na tela de IV. 0 comando OCKT cria espago, 

limpando a tela. 

6 - Sobrecarga aritmetica. 

7 - Comando RETURN usado sem o correspondente G03UB. 

8 - Uso indevido do comando INPUT. 

9 - Comando STOP executado. 

A - Argument© invalido para certas fungQes como SQR, LN, ASN. 

B - Numero inteiro fora de faixa adequada para arredondamento. 

C - Express3o numerica invalida na instrugSo VAL. 

D - Programa interrompido por BREAK. 

E - N3o utilizado. 

F - Comando SAVE utilizado em "string 1 ' vazia. 
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M2os 2 obra! Ligue o canputador e a TV. 

Espere aparecer o CURSOR K no canto inferior esquerdo do video. 
COMANDOS PRINT, RUN E NEW LINE 


0 BASIC SEM RODEIQS 1 ATRAVES DO USO 


Sabemos que as criangas aprendem a falar espontaneamente, sem 
teorias, apenas fazendo uso das palavras, cujo significado so mais tar 
de assiinilam. E logo estao se cocnunicando com o mundo, sem rodeios ou 
teorias, naturalmente. 

Vamos aprender a linguagem BASIC do microconputador atraves des- 
se metodo: o uso direto, sem teorias. E quando quisermos conhec§-las, 
vamos consul tar sua gramatica. 

As tec las do TK englooam as seguintes fungQes: 


COMANDOS OU INSTRUCOSS 

(em branco, fora e acir 
ma da tec:'' 


S3o acionados diretamente 

IFTRAS E NUMEROS 

(em branco, na tecla) 

S3o acionados diretamend 

CCMANDOS E FUNffES 

(em branco, fora e abair 
xo aa tecla) 

S3o acionados apos comut< 

gao conjunta das teclas 

SHIFT e FUNCTION. 


QCMANDOS E SINAIS 
(em amarelo, na tecla) 



pos cotrutagao conjunta 
das teclas SHIFT e 


GRAPHICS. 

Algumas teclas n3o sSo providas de todas essas fungOes. 

As palavras referentes a comandos, instrugQes ou fungOes n3o s2o 
digitadas letra por letra. Exemplos: PRINT, RUN, LIST etc. Basta pres- 
sionar a tecla correspondente para aciona-las. 0 espago apos as mesnas 
tambem n3o precisa ser digitado, pois faz parte delas. 

0 espago entre outras palavras ou numeros em digitagSo e dado pe 
la tecla SPACE. 


PRINT: Faz aparecer no video o resultado de urn comando, seja um 
numero, uma palavra ou frase, um desenho, uma operagao mat emit ica ou 
qualquer outra informagao, inclusive espagos T! vazios". 

RUN: P5e em execugao um programa existente no computador. 

NEW LINE:' Aciona os comandos introduzidos via teclado, encaixa 
no programa as linhas de instrugQes digitadas e faz aparecer listado 
no video um programs interrompido ou ja executado. 

Digite em seguida as frases abaixo, sem esquecer dos numeros e 
aspas. Apos digitar cada frase, pressione a tecla NEW LINE. 

1 PRINT "COMEgO AGORA" 

2 PRINT "A FAZER USO" 

3 PRINT " DO MEU TK" 

Note que apos ter sido digitado um comando o CURSOR K passa pa¬ 
ra L, indicando que esta aguardando a entrada de dados. 

A numeragao adotada nas linhas acima tern a finalidade de carac- 
terizar um programs, para que o computador o execute na sequencia in- 
dicada. Faga "rodar" o programa: 

Tecle RUN e NEW LINE* Admire a execugao de seu primeiro progra¬ 
ma no video. 

Tecle agora NEW LINE. Olhe novamente para o video. 

Tecle de novo RUN e NEW LINE. 

COMANDO NEW 

NEW: Limpa toda a memoria de programs (RAM) do computador, ze- 
rando o sistema. NEW e a primeira tecla a esquerda da tercsira carrei 
ra (de cima para baixo) do teclado. N3o deve ser confundida com a te¬ 
cla NEW LINE. 
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Limpe agora a memoria do microcomputador, is to e, ponha o mesmo 
na condigao de T, livre para receber urn program' 1 : 

Tecle NEW e NEW LINE. 

O0MANDO5 SHIFT E RUBOUT 


SHIFT: Cornutador do teclado. Acionado com FUNCTION, permite in- 
troduzir os comandos e fungSes iirpressos em branco fora e abaixo das 
tec las. Acionado com GRAPHICS e as tec las correspondences, introduz os 
sinibolos graficos. Acionado can as demais teclas, introduz os comandos 
e sinais impressos em amarelo nas me sms. 

RUBOUT: Funciona apenas em linhas em edigao (digitagao) ou em li 
nhas ja editadas, de programas, quando estas s3o levadas para o local 
de edigSo atraves do comando EDIT. Atua nas posigSes onde se posicio- 
naran os cursotes de edigSo (K, L, F, G), sendo estes deslocados atra¬ 
ves das teclas 5 e 8 (nas diregDes das setas de cada tecla), pressiona 
das as mesmas simultaneamente can a tecla SHIFT. 

Faga agora seu segundo program. 

Digite, n£o esquecendo de teclar NEW LINE apos cada linha: 

1 PRINT "GOSTEI," 

2 PRINT ’VOU CXOTINUAR. 11 

3 PRINT n 0 QUE FAQO AGORA? M 

4 PRINT "FAREI CONTAS... 1 ' 

Cbs.: Se durante a digitagSo pressionar indevidamente alguma te¬ 
cla, tecle similtaneamente SHIFT e RUBOUT em seguida para apagar o ca 
racter introduzido assim, e prossiga normlmente can a digitagSo. 

V2o ser introduzidos a seguir os sinais de operagQes aritmeticas 
an continuidade ao program acima iniciado: 

Digite: 5 PRINT " 2 * 2 " 

6 PRINT r, 10/2 n 

7 PRINT "10+10” 

8 PRINT "20-10" 


Note que os sinais + e - s3o os convencionais. No nticrocomputa- 
dor o sinal de multiplicag2o e o * (asterisco) e o de divisao a /(bar 
ra). 

Tecle RUN e NEW LINE. Repare no video que as contas ou operagS- 
es indicadas n5o foram realizadas. 0 que esta entre aspas apos a ins- 
trugao PRINT o computador apenas "imprint" no video. 

Digite, agora sem aspas: 

9 PRINT 2*2 

10 PRINT 10/2 

11 PRINT 10+10 

12 PRINT 20-10 

Tecle RUN e NEW LINE. Examine o video e note que as operagSes 
aritmticas das linhas 9, 10, 11 e 12 foram agora realizadas, por es 
tarem sem aspas. 

ASPAS COMO COMANCOS 

As ASPAS indicam ao conputador que quaisquer caracteres conti- 
dos por elas devem ser "escritos" no video, podendo ser apenas um ca- 
racter qualquer, numeros, um desenho, uma palavra, frase ou um texto, 
constituindo ou caracterizando um "string". As me sms n2o s3o repro- 
duzidas nas instrugOes executadas que as precedem. 

Quando se deseja usa-las na sua fungSo normal, isto e, cano sim 
bolos graficos, de maneira a destacar algo (um palavra ou frase, por 
exemplo), deve ser acionada a tecla que as contem duplicadas, em ama- 
relo (tecla Q). 

Tecle NEW e NEW LINE para zerar o microcomputador. 

Digite: 10 PRINT "2*2 - M ;2*2 

,20 PRINT M l0/2 = iK ; 10/2 

30 PRINT ”10+10 = 10+10 

40 PRINT M 20-10 = n ;20-10 

Tecle RUN e NEW LINE. Observe no video o efeito exercido pelos 
sinais de ponto e virgula colocados apos as aspas e seguidos pelas o- 
peragOes indicadas sem aspas. 


16 


17 



Digite, sem se inportar can o que ja esta digitado, ou seja 
o programa de linhas 10, 20, 30 e 40: 


Tecle RON e NEW LINE, Observe bem as posigDes das impressSes fei 
tas no video e compare-as con as instrugSes do program. 


1 PRINT "OPERATES MA1EMATICAS:” 

5 PRINT 1 HJLTIPLICAQAO: 11 

15 PRINT "DIVIS®}: 11 

25 PRINT ”ADigS0:” 

35 PRINT "SIBTRAgSD:” 

Observe no video como ficaram ordenadas as instrugSes da primei 
ra parte digitada do programa - linhas 10, 20, 30 e 40 - e as da se- 
gunda parte digitada - linhas 1, 5, 15, 25 e 35. Se a primeira parte 
tivesse sido digitada com numeros de linhas de 1 a 4 nSo teria sido 
possivel intercalar as linhas da segunda parte. 0 programa todo teria 
que ser digitado novamente desde a primeira linha. Veja nesse exemplo 
a conveniencia de qualquer programa ser digitado com numeragao de li¬ 
nhas espagada, em especial os programas longos e canplexos, para que 
instrugQes suplementares ou "esquecidas" possam ser introduzidas devi 
damente, is to e, no local certo e a qualquer tempo. 

Tecle RUN e NEW LINE. Observe o efeito do programa e o resulta- 
do das ins trusses suplonentares. 

Tecle NEW e NEW LINE, zerando o computador. 

Ate agora o comando PRINT escreveu ou imprimiu no video o que 
Ihe foi instruido sempre a partir do ponto extreme .do canto superior 
esquerdo da tela. Vamos agora usar outros pontos ou locais do video. 

OfflAND AT 

AT: Determina a posigao para PRINT, indicando linha e coluna pa 
ra inicio de impressao. 


Tecle NEW LINE. 

Digite, acrescentando ao programa acima: 

7 PRINT ,! P0S. PONTO: LINHA 0, OOLUNA 0” 

15 PRINT AT 21,0; 11 P0S. PONIO:'LINHA 21, OOLUNA 31 M 

Tecle RUN e NEW LINE. Observe que o comando PRINT, quando nSo e 
seguido da indicagao do local a inprimir, imprime na linha seguinte h 
da execugao da instrugao PRINT que a precede. E quando seguido da indi 
cag3o do local a imprimir, executa a risca a ordera, n3o iinportando on- 
de se encontre, como no exanplo da linha 15. 

QOMANDO LIST 

LIST: Faz com que seja apresentada no video a listagem do progra 
na que estiver na memoria do computador. 

Tecle LIST e NEW LINE e examine mais uma vez a listagem que sera 
exibida no video, no caso a do programa que introduziu AT. 

Tecle RUN e NEW LINE. Repare agora no canto inferior esquerdo do 
video. Ha ali urn codigo de reportagem, ou uma denotagao: 0/50. N9 0 in 
dica que o programa foi executado, is to e, que a ordem de comando RUN 
foi cumprida. 0 n9 50 apos a barra indica a ultima linha de programa e 
xecutada, nesse caso a final, significando que o programa cocnpletou to 
do seu ciclo, sem interrupgao. Consulte a tabela conpleta dos codigos 
de reportagem para se familiarizar com as demais indicagQes. 

Tecle NEW e NEW LINE para "zerar" o microcomputador. 


Digite: 5 PRINT 

10 PRINT AT 5,5; n AQUI LINHA 5, COLUNA 5” 
20 PRINT AT 10,10; n AQUI 10,10" 

30 PRINT AT 15,15; n AQUI 15,15” 

40 PRINT AT 17,20;”AQUI 17,20 M 
50 PRINT AT 21,31;”. 11 


COMANDO TAB 


TAB: Determina a coluna para inicio de impressao no video, sendo 
a largura da tela considerada em 32 colunas, numeradas de 0 a 31, par- 
tindo da margem esquerda. 

Digite: 10 PRINT "COLUNA 0” 
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20 PRINT TAB 5;"00LUNA 5" 

30 PRINT TAB 14;"00LUNA 14" 

40 PRINT TAB 22;"00LUNA 22" 

Tecle RUN e NEW LINE, Note o efeito de TAB no video. 

LINHAS E CCOJNAS 

Para efeito de determinar locais de impressao na tela de video, 
devemos saber entSo que a mesma se divide em: 

22 linhas numeradas de 0 a 21, a partir da margem superior, e 

32 colunas nuneradas de 0 a 31, a partir da margem esquerda. 

Para determinar o local a imprimir, a instrugao deve ser feita 
na ordem LINHA, CX5LUNA, atraves dos comandos PRINT e AT. Para indi¬ 
car apenas a COLUNA como local de inicio de impressao, deve ser usada 
a instrugao TAB. 

Qiando n3o houver indicag9o de local apos o comando PRINT, a im 
pressao sera iniciada pelo computador na primeira linha que, na ordem 
de sequencia de execugao do program, estiver disponivel, e sempre na 
coluna 0, ou ap6s um sinal de ponto e virgula existente no final de u 
ma linha de instrugSo PRINT precedente. 

Tecle RUN e NEW LINE para zerar o micro. 

VIRGULA E PONTO E VIRGULA COMO CXEIANDOS ESPECIAIS 

Qibora a rigor n3o sejam definidos como tais, seu desempenho em 
linhas de programas obriga que assim sejam considerados. 

VIRGULA: Determina colunas para inicio de impressao no video. U 
ma virgula colocada apos o comando PRINT determina como local de ini¬ 
cio de impressao no video a coluna 16. Duas virgulas apos PRINT deslo 
cam o inicio de impressao para uma segunda linha, coluna 0, deixando 
a primeira em branco, Tres virgulas apos PRINT deslocam o inicio de 
impressao para a coluna 16 da segunda linha. Quatro virgulas seguindo 
a PRINT deslocam a impressao para uma terceira linha, coluna 0, sal- 
tando duas. E assim por diante. 

0 seu uso can essa finalidade economiza bvtes num progr?TT? 3 


A virgula e tadbem usada obrigatoriamente apos a instrugao POKE. 
BYTES e POKE ser3o vistos mais adiante. 

PONTO E VIRGULA: 0 con junto convene ional - ponto em cima, virgu¬ 
la em baixo - determina como local para inicio de impressao a posigao 
iinediatamente seguinte a sua, quando colocado no final de instrugOes 
que contenham o comando PRINT. E usado obrigatoriamente con o canando 
con junto PRINT AT, apos o numero de coluna indicado. 

Digite: 10 PRINT ’TJNDO" 

20 PRINT "DIA" 

30 PRINT ’TJNDO", 

40 PRINT lf DIA" 

50 PRINT 'TINDO' 1 ; 

60 PRINT "DIA" 

Tecle RUN e NEW LINE. Perceba no video o efeito da virgula colo¬ 
cada na linha 30 e do ponto e virgula na linha 50. 

Tecle NEW LINE. Para que a ultima frase do programs fique corre- 
ta, acrescente um espago entre a palavra LIND0 e a aspa que a segue: 

Digite novamente a linha 50: 

50 PRINT !l LIND0 n j 

Tecle NEW LINE. A substituigSo da linha 50 anterior pela modifi- 
cada se processara automaticamente. 

Tecle RUN e NEW LINE. Note a diferenga na ultima frase depois da 
alteragao feita e estude mais uma vez o efeito da pontuag3o. 

LINHAS DE INSTRUCTS CCM NUMERACAO IDSNIICA 

Una linha de instrugao digitada com numeragao ja .existente em ou 
tra sobrep3e-se a mesma, apagando-a* Deve-se tomar cuidado ao digitar 
os numeros de linhas de instrugOes de um programa. Se houver no mesmo 
uma linha ja digitada com numero 1, por exemplo, podera suceder que se 
no monento de digitar a de numero 10 a tecla 0 nSo for press ionada ade 
quadamente e passar despercebida a falha, a que deveria ter 10 fica 
sendo mesmo linha 1 e vai se colocar no lugar da que ja existia, apa- 
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gando-a. Essa e uma das razOes que aconselham a sempre conferir can 
cuidado um programa apos ser digitado, antes de roda-lo. 

Tecle NEW e NEW LINE para zerar o computador. 

Digite: 10 PRINT "VOU PARAR";AT 5,0; r, ESTOU CANSADO"; 

AT 20 ? 10; ,I 003OTNUAREI DEP0IS n ;AT 10,5; 

"Mas estou gostando" 

Atente bem para a colocaqao das aspas, virgulas e pontos e vir¬ 
gulas, 

Tecle RUN e NEW LINE, Perceba o alcance de uma unica instrugSo 
can auxilio do comando AT e do sinal ponto e virgula. 

Tecle NEW e NEW LINE. Ja sabemos que assim zeramos o micro. 

Digite: 10 PRINT rf NS0" 

20 PRINT "GOSTO DE ESTUDAR." 

30 PRINT ! V0U PASSEAR." 

40 PRINT ’VOU ME DIVERTIR. M 

Tecle RUN e NEW LINE. Atente bem ao que o video exibe. 

Digite RUN 20 e tecle NEW LINE. Leia o que esta no video agora. 

Digite RUN 30 e tecle NEW LINE. Leia o que o video exibe agora. 

Digite RUN 40 e tecle NEW LINE. Observe novamente o video. 

OOMANDO GOTO 

GOTO: Dirige ou desvia a execuqSo de um programs para a linha do 
mesmo cujo numero e apontado por ele. 

Digite GOTO 10 e tecle NEW LINE. Observe sempre o que e escri- 

to no video apos a execuqSo 
Digite GOTO 20 e tecle NEW LINE. de cada cocnando feito, segui- 

do ou n3o do numero de linha 
Digite GOTO 30 e tecle NEW LINE. de programa. Compare-os bem. 
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Digite GOTO 40 e tecle NEW LINE. 

Tecle NEW LINE. 

Tecle LIST e NEW LINE. 

Digite LIST 20 e tecle NEW LINE. 

Digite LIST 30 e tecle NEW LINE. 

Digite LIST 40 e tecle NEW LINE. 

Tecle NEW e NEW LINE. 

Digite: 10 PRINT "MEU NONE E JULIO" 

20 GOTO 10 

Tecle RUN e NEW LINE. Observe o efeito de GOTO na linha 20. 
Tecle NEW LINE. 

Acrescente agora uma linha ao programa: 

Digite: ‘ 5 SCROLL 

Mude a linha 20: 

Digite: 20 GOTO 5 

OCMANDO SCROLL 

SCROLL: Faz com que a impressSo no video seja feita a partir da 
ultima linha inferior, sucessivamente, empurrando para cima as li- 
nhas que vSo sendo exibidas e eliminando as que v3o atingindo o topo 
da tela de video. 

Tecle RUN e NEW LINE. Observe a frase "rolando" no video. 

CDMANDO BREAK 

BREAK: Detem a execuq3o do programa em certas situaqSes. N2o 
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atua apos o comando INPUT. 

Tecle BREAK e NEW LINE, brecando o program que esta rodando. 

Tecle NEW e NEW LINE. 

OCMANDQS GOSUB, STOP, COOT, REM, PAUSE, CLS E RETURN 

GQSUB: Desvia a execugao de urn program para uma subrotina cons 
tante do mesmo, retornando automticamsnte a execugao para a linha de 
instrugao seguinte a do desvio. 

STOP: Detem a execugao de um program nas seguintes situagSes: 

- quando for instrugao em linha de program; 

- quando acionado simultaneamente com a tecla SHIFT enquanto a- 
guarda entrada de dados para uma variavel numerica na execu¬ 
gao de um instrugao INPUT; 

- quando acionado simultaneamente com a tecla SHUT apos esta 
ter sido acionada previamente com uma das tec las EDIT ou RUB- 
OUT, enquanto aguarda entrada de dados para uma variavel alfa 
numerica na execugao de uma instrugao INPUT. 

COOT: Reinicia a execugao de um program interrompido pelo co¬ 
mando STOP ou por falta de espago no video, a partir do ponto em que 
ocorreu a interrupgao. 

REM: Toma sem efeito de execugao um linha de programa, quando 
colocado apos o numero da mesma. Permite tambem a inclusao de linhas 
com comentarios elucidativos em um programa, sem que o computador as 
interprete cano comandos ou linhas de instrugao do program. 

PAUSE: Detem a execugao do programa pelo tempo cujo valor Ihe e 
atribuido, mantendo no video a ultima irragem gerada antes de sua exe¬ 
cugao. 

CLS: Elimina do video as imgens ou dados produzidos pelo pro¬ 
gram. 

RETURN: Comando canplementar obrigatdrio de GOSUB, devendo figu 
rar sempre na ultima linha de um subrot ina. 

Vamos experimentar os canandos acim num pequeno program: 


Digite: 10 PRINT AT 10,8;”ATENg50, AGUARDE" 

20 GOSUB 160 

30 PRINT AT lO^j’VEM AI UMA BOA" 

40 GOSUB 160 

50 PRINT AT 10,5;"NAO, NAD E ISSO, NSO..." 

60 GOSUB 160 

70 PRINT AT 10,6; IT NADA DE RACHEL WELCH" 

80 GOSUB 160 

90 PRINT AT 10,7;"SABE QUAL E A BOA?" 

100 GOSUB 160 

110 PRINT AT 10,4;"BEM, SO VOCE E QUEM SABE" 

120 GOSUB 160 

130 PRINT AT 10,8; "F1M, 0BRIGAD0" 

140 STOP 

150 REM SUBROTINA DE REPETigSO 
160 PRINT AT 7,12; ,t lK NEWS" 

170 PAUSE 300 
180 CLS 
190 RETURN 

Tecle RUN e NEW LINE. 

Note que, para fazer um program que a cada poucas linhas deva 
repetir algo - um operagio aritmetica, um tabela, um texto etc. - se 
nao houver a instrugSo GOSUB, que desvia o program para um subrotina 
estabelecida para repetigao, todas as instrugSes ou dados da msm te- 
r3o que ser inseridos tantas vezes quanto forem exigidos. No program 
acim, por exemplo, no lugar das linhas 20, 40, 60, 80, 100 e 120. Se 
for um subrotina pequena como a iniciada na linha 160, n3o sera tao 
dificil ou trabalhoso. Mas, imagine um subrotina de 20 ou mis linhas 
can instrugSes complexas! A instrugao GOSUB elimina esse problem. Exi 
ge apenas que se coloque no fim da subrotina a instrugao que Ihe e can 
plementar: RETURN. 

Repare tambem na instrugao REM da linha 150, que serve apenas de 
guia ou lembranga para o programador ou usuario do computador. Nao aci 
ona nenhune fungSo e nao impede o andamento do program. 

Tecle RUN e NEW LINE, rodando novamente o programa para observar 
bem os efeitos dos comandos PAUSE e CLS. 

Ao parar o program, note no canto inferior esquerdo do video a 
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denotagao 9/140, significando que o program parou pelo comando STOP 
da linha 140- A linha 140 n3o e a ultima linha de instrugSo do progra 
ma, ms € a de finalizagao, ja que as demais, 150 a 190, constituem 
uma subrotina com instrugSo obrigatoria de retorno. 

Sinta melhor o efeito do comando PAUSE alterando a linha 170: 

Digite: 170 PAUSE 100 

Tecle NEW LINE para substituir a linha 170 anterior. 

Tecle RUN e NEW LINE. Repare no tempo de duragSo de cada tela a 

gora. 

Elimine a seguir a linha 180: 

Digite apenas o numero da mesma: 180 

Tecle NEW LINE para que seja efetuada a eliminagSo da mesma. 
Tecle RUN e NEW LINE. Note a falta do comando CLS. 

Tecle CLS e NEW LINE. 

Tecle LIST e NEW LINE. 

Tecle NEW e NEW LINE. 

Digite em seguida, praticando um pouco mais: 

10 PRINT , "POR H0JE CHEGA" 

20 PRINT , , M S0 AMANH& AGORA 11 
30 PAUSE 30 
40 CLS 
50 GOTO 10 

Tecle RUN e NEW LINE. N3o espere rnuito, se estiver cansado. 

Tecle BREAK, NEW, NEW LINE. Desligue o micro. Descanse e reveja 
o que foi visto ate aqui antes de prosseguir. Elimine duvidas. 

CCMANDOS FOR, NEXT, LET E IQ 


TOR: Define e introdu 2 uma variavel contadora ou de controle, 
criando um "loop”, ou seja um lago. Deve ser ccmplementado por NEXT. 

NEXT: Elemento acionador da sequencia de contagem de uma varia¬ 
vel de controle ou contadora. 

IET: Permite atribuir um valor a uma variavel numerica ou dados 
a uma variavel alfanumerica, neste caso sempre entre aspas, caracteri- 
zando uma 1 ’string”. 

TO: Elemento operador complementar do conando TOR. Usado tambem 
en operagSes de fatiamento de ,, strings tl ou expresses alfanumericas, 
como sera visto adiante. 

Digite: 10 LET A=5 

20 FOR B=1 TO A 
30 PRINT B 
40 NEXT B 

Tecle RUN e NEW LINE. Atente para o ultimo numero impresso no vi 
deo e compare-o com o valor atribuido & variavel A. 

Tecle NEW LINE. 

Digite: 10 LET A=10 

Tecle NEW LINE. 

Tecle RUN e NEW LINE. Observe de novo o ultimo numero impresso 
no video e o valor atribuido h variavel A. 

0 que foi feito? Foram usadas duas variaveis, A e B, a primeira 
com variavel simples, a qual foram atribuidos valores atraves do co¬ 
nando LET, a segunda como variavel contadora, h. qual foi determinada a 
execugSo de contagem de 1 ate o valor de A, atraves das instrugSes com 
plementares TOR e NEXT, sendo a contagem registrada atraves do canando 
PRINT. 

As variaveis poderiam ser quaisquer de A a X, ccmo contadoras,- 
de A a X, de A1 a XI, AN, AR, AMER etc., como variaveis numericas sim¬ 
ples. 

Tecle NEW e NEW LINE. 
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Digite: 10 LET M=5 

20 FOR Ol ID M 
30 PRINT ,f ENTENDI u 
40 NEXT C 

Tecle RUN e NEW LINE, 

Tecle NEW LINE e acrescente tr£s linhas ao program acima: 

Digite: 5 LET 0=10 (letra 0 para a variavel) 

50 PRINT ’HJITO BEM n 

60 PRINT "MEREQO NOIA ,f ;0 (letra) 

Tecle RUN e NEW LINE. Examine o program executado. 

Tecle NEW LINE. Estude o programa listado. 

Tecle NEW e NEW LINE. 

Digite: 10 LET A=5 

20 LET B=10 
30 PRINT n A+B = n ;AfB 
40 PRINT "B/A = n ;B/A 
50 PRINT n A? v B = n ;A*B 
60 PRINT "B-A = n ;B-A 

Tecle RUN e NEW LINE. Note que as operagSes indicadas foram exe 
cutadas de acordo com os valores atribuldos as variaveis A e B. 

Tecle NEW LINE. Deixe o programa listado no video. 

COMANDO CLEAR 

CLEAR: Anula todos os valores atribuidos a variaveis numericas 
e dados atribuidos a alfanumericas, ’’limpando" todas as variaveis do 
program, sem apagar ou destruir este. A execug2o do comando RUN acio 
na automaticamente CLEAR, is to e, antes de o program rodar, todas as 
variaveis s£o canceladas. 

Vamos introduzir no program acima o comando CLEAR. 


Digite: 25 CLEAR 

Tecle NEW LINE para introduzir a linha no programa. 

Tecle RUN e NEW LINE. 

0 que aconteceu? 0 comando CLEAR da linha 25 anulou as atribui- 
q3es de valores as variaveis A e B, feitas atraves das linhas 10 e 20, 
e a execugSo do programa parou por falta de elementos para prosseguir. 
Observe no canto inferior esquerdo do video a denotag§o 2/30, o codigo 
de reportagem 2 antes da / significando utilizagSo de variavel ou vari 
aveis sem definigao. 

Tecle NEW LINE. 0 CURSOR DE EDigSD deve estar localizado na linha 
25, a que foi digitada por ultimo e inserida no program ja existente. 
Deixe o program listado no video, 

COMANDO EDIT 

EDIT: Faz com que uma duplicagao da linha de program m que es¬ 
te ja o CURSOR DE EDigS) se reproduza no local onde sao editadas as li¬ 
nhas de instrugOes - extreme inferior do video - para alteragOes. 

Tecle simultaneamente SHIFT e EDIT. 

Note que a linha 25 continua no program, mas foi tambem repro- 
duzida no local onde s3o editados os comandos e linhas de instrugOes. 

Tecle REM. A linha 25 devera ficar assim: 

25 REM CLEAR 

Tecle NEW LINE. Note que a linha alterada com auxilio do comando 
EDIT substituiu a original. 

Tecle RUN e NEW LINE. Observe que agora os valores atribuidos as 
variaveis A e B n2o foram anulados pelo ccmando CLEAR, que ainda esta 
no programa, porem inatuante por forga do comando REM. 

Tecle NEW e NEW LINE. 
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Digite: 10 PRINT A+B 

Tecle RON e NEW LINE* 

0 que aconteceu? Nada. 0 computador apenas informou - olhe no 
canto inferior esquerdo do video a denotagSo 2/10 - que n2o foram a- 
tribuidos valores as variaveis utilizadas, A e B, n3o sendo possivel 
efetuar a operagSo indicada na linha de instrugSo de numero 10. 

Digite agora, sem numerar a linha: 

LET A=10 

Tecle NEW LINE. 

Digite ainda, sem numerar a linha: 

LET B=50 

Tecle NEW LINE. 

Tecle GOOD 10 e M LINE. N3o tecle RUN para n§o anular as de- 
finigOes de A e B. Observe no video que o program de linha unica a- 
gora foi executado. 

Digite PRINT A+B 

Tecle NEW LINE. Observe de novo o video. 

Repita as operagOes com PRINT B/A, PRINT B-A. 

Tecle RUN e NEW LINE. Observe que, agora, o programs nSo foi e 
xecutado e apareceu de novo no canto inferior esquerdo do video a de 
notagSo 2/10, porque a instrugao RUN, ao ser executada, procedeu an¬ 
tes a um CLEAR nos registros das variaveis. 

Dm programa longo ou complexo que utiliza variaveis definidas, 
is to e, con valores atribuidos, e que eventualmente sofre uma parada 
ocasional, devera receber o ccxnando GOTO para ser posto de novo em e 
xecugao, pois tal comando nSo anula os registros ja feitos. GOTO, to 
davia, precisa ser complementado pelo numero de linha a que deve se 
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dirigir, como ja vimos. Assim, para rodar o programa desde o inicio, 
basta comandar GOTO 0 ou GOTO 1 e NEW LINE, nSo importando se a pri- 
treira linha do program foi 1, 10 ou 200. 0 computador se encarrega 
de procurar a primeira linha existente apos 0 para iniciar a execugao 
do programa. Tal cuidado devera ser observado principalmente com pro¬ 
grams carregados de fitas K-7 para o computador ..e que utilizam vari¬ 
aveis, para evitar surpresas. 

Digite: 10 LETT A$= r, EST0U ff 

20 LET B$= M GOSTANDO 11 
30 PRINT A$+B$ 

Tecle RUN e NEW LINE. Observe o resultado. 

Tecle NSW LINE. 

Digite, compiletando o program: 

40 PRINT rt DE ESIUDAR " 

50 LET C$= , HJITO M 
60 PRINT A$+B$+C$ 

Tecle RUN e NEW LINE. Observe sempre no video o resul- 

Tecle GOTO 40 e NEW LINE. tado de cada comando feito, ana- 

Tecle GOTO 60 e NEW LINE. > lisando-os comparativamente. Al- 

Tecle CLEAR e NEW LINE. gums diferengas s3o, noitas ve- 

Tecle GOTO 40 e NEW LINE. zes, tSo sutis, que podem passar 

Tecle GOTO 60 e NEW LINE. despercebidas. Se n2o nota-las a 

Tecle RUN e NEW LINE. prime ira vista, insist a um pouco. 

Repita algumas vezes os passos acim e estude bem os efeitos de 
LET e CLEAR em relagSo a RUN e GOTO. 

Observe tambem que as variaveis, quando seguidas de $, aceitam 
quaisquer atribuigSes: palavras e/ou numsros e/ou frases, desenhos ou 
sinibolos graficos. S3o as VARIAVEIS ALFANUMERICAS e s3o introduzidas 
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e processadas pelo computador sempre dentro de aspas. 

Tecle NEW e NEW LINE. 

Experimente introduzir no computador uma linha de instrugSo co- 
nt> a que segue: 

Digite: 10 LET A$=EST0U 

Tecle NOT LINE. Tecle outra vez. 

A linha n2o entra, isto e, nao e aceita pelo computador e volta 
com uma notagSo S - em video inverso - indicando erro de sintaxe. Fa- 
ga nova experiencia: 

Digite: 10 LET A-10 A 

Tecle NEW LINE. Esta linha tarnbem nao e aceita pelo canputador, 
voltando com a notagao de erro de sintaxe. No primeiro exemplo a cau¬ 
sa e a falta de aspas na palavra ESTCU, por ser definigao de urn va¬ 
riavel alfanumerica, no segundo pela atribuigao indevida de valor, ou 
melhor, atribuigao errada de valor a variavel numerica A. 

ccmandos if, then, input, ini, rand, r nd 

IF: Elemnto introdutor de proposigSes condicionais cuja dedu- 
gSo logica devera ser feita pelo computador. IF tem como cccnplemento 
obrigatorio IHEN. 

THEN: Elemento operador logico complementer de IF, introdutor e 
antecessor obrigatorio de urn caiendo ou uma instrugao a ser programa- 
da em fungao da dedug3o feita pelo computador sobre uma proposigSo 
condicional. (IF = Se. THEN = EntSo.) 

INPUT: Introduz variaveis nurm programa, as quais deverao ser a- 
tribuidos valores ou dados a medida em que o programa e executado, 
sendo que cada linha de programa em que conste INPUT interrompe o an- 
dairento do mssmo para esse fim, aparecendo no video, no canto inferi¬ 
or esquerdo, o CURSOR L, sem aspas para uma variavel numerica e can 
aspas para uma variavel alfanumerica. 


INT: Arredonda um numero processado pelo computador, desprezan- 
do a parte decimal. 

RAND: Controla a M aleatoriedade M da fungao RND. Se seguido de 
numero diferente de 0 Centre 1 e 65535) far a can que a "aleatorieda- 
de 11 , em caso de repetigao na execugSo do programa, seja sempre a par- 
tir de um mesmo numero "sorteado". 

RND: Fomece um numero aleatorio entre 0 e 0.99999999. A fim de 
que fomega numaros no sistema mais aleatorio possivel, deve ser usa- 
do sem seu "controlador" RAND. 

N3o sera demais letiibrar nest a oportunidade que o ponto substi- 
tui a virgula em numeragDes no computador, em consequencia de ser es- 
te originario de paises onde e o sistema adotado. 

C0MAND0 FUNCTION 

FUNCTION: Permite introduzir num programa conandos e fungQes ou 
instrugGes que estao impresses em branco abaixo das teclas, no pai- 
nel. Exemplos: INI, RND, CODE, INKEY$, SIN, COS etc. Para tanto, faz- 
se necessario pressiona-lo antes, e sinultaneamente, com a tecla cam 
tadora SHIFT. 

Vamos aplicar em seguida, num pequeno program, os catandos ou 
instrugOes acima introduzidos. Antes, porem, convem lembrar que os co 
mandos e sinais impressos em amarelo na parte superior das teclas sao 
introduzidos com auxilio da tecla SHIFT, pressionada simultaneamente. 

Digite: 1 REM JOGO DE ADIVINHAQAD 

10 LET A= INT (RND*5) 

20 IF A<1 THEN LET A=1 

30 LET A$-VOCE acertou 11 

40 LET B$- VOCE ERR0U n 

50 PRINT AT 8,3; ri DIGITE UM NUMERO DE 1 A 5" 

60 INPUT B 

70 PRINT AT 12,15;B 

80 IF B=A THEN PRINT AT 15,10;A$ 

90 IF BOA THEN PRINT AT 15,11 ;B$ 

100 PAUSE 100 
110 CLS 
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120 CLEAR 
130 GOTO 10 

Tecle RUN e NEW LINE. Note no video a frase da linha 50 e o CUR 
SOR L, no canto inferior esquerdo, indicando que o computador esta a- 
guardando a entrada de um numero ou valor, em obediencia a instrugao 
da linha 60. Essa instrugao introduz a variavel B, que devera ser de- 
finida, isto e, devera receber um valor numerico, atraves de digita- 
g3o, pelo teclado. 

Digite entao qualquer numero entre 1 e 5. 

Tecle NEW LINE. 0 coraputador continuara a pedir numeros e inf or 
mando se voce acertou ou errou. 

Tecle SHIFT e STOP siirultaneamente, se o coraputador estiver a- 
guardando entrada de um dado, ou BREAK se estiver na execugao da li¬ 
nha 100 - PAUSE - e em seguida NEW LINE, para parar o programs e fa¬ 
ze-lo aparecer listado no video. Estude atentaraente suas instrugSes. 

Note a instrugao da linha 10. Ela faz com que o canputador esco 
lha aleatoriamente um numero inteiro ate 5 e o atribua a variavel A. 
Mas ccno 0 tarrfoem pode ser sorteado pelo canputador e o programs de- 
termina "de 1 a 5", a linha 20 impede que seja menor do que 1 o valor 
a ser dado a variavel A. 

Repare bem o desempenho de IF e THEN com as fungSes = (igual), 
< (menor), < >(diferente), nas instrugSes das linhas 20, 80 e 90. 

Lsmbre-se finalmente que ha auas maneiras de definir variaveis 
ou atribuir valores as mesmas: uma direta e unediata, exemplo LET A—, 
outra atraves do ccmando INPUT, que solicits a definigSo apenas no mo 
ment-n em que e este acionado pela execugao sequencial do programa, 
o que propicia interessantes recursos de programagSo, como sera visto 
raais adiante. 

0 nesno acontece com as variaveis alfanumericas, apenas com di- 
ferenga nas atribuigSes, ja que estas, era vez de numeros ou valores, 
s3o definidas atraves de "strings" que, como ja vimos, aceitam letras 
ou palavras, frases ou caracteres graficos, e raesmo numeros, enibora 
eles n3o sejam tratados normalmente como valores, a n2o ser atraves 


do coraando VAL, que sera visto mais adiante. As definigSes das vari¬ 
aveis alfanumericas s2o feitas sempre entre aspas, n3o sendo reconhe- 
cidas pelo ccmputador em outra forma. 

Rode o programa mais algumas vezes, para observagao. Depois: 

Tecle NEW e NEW LINE. 

CCMANDO NOT 

NOT: E o elemento operador logico (= n3o), complementer de IF. 

Digite: 10 LET A=0 

20 PRINT "POSSO LHE FAZER UMA PERGUNIA?" 

30 PRINT ,,"(SE ""SIM"" DIGITE ""SIM"" E NEW LINE. 

E3CPERIMENIE DEPOIS ""NSO"".)" 

40 INPUT A$ 

50 IF NOT A$="SIM" THEN (XITO 200 

60 PRINT , ,"CCM QUANT03 PAUS SE FAZ 1 CANQA?" 

70 PRINT ,,"DIGITE 0 NUM. E TECLE NEW LINE" 

80 INPUT PAUS 

90 IF NOT PADS=1 THEN GOTO 120 
100 PRINT ,,"ACERTOU, PARABENS" 

110 GOTO 210 

120 PRINT ,,"NS0. 1ENIE DE NOVO",,,"(CHANCE NUMERO " 
;A+1;")" 

130 LET A=A+1 

140 IF A=5 THEN GOTO 180 

150 PAUSE 100 

160 CLS 

170 GOTO 60 

180 PRINT ,,"ACABARAM SUAS 5 CHANCES. TCHAU." 

190 GOTO 210 

200 PRINT ,,"CK, NAD FAREI. SINK) MUITD." 

210 PAUSE 100 
220 CLS 
230 LIST 

Tecle RUN e NEW LINE. Responda as perguntas do programa. Res- 
ponda acertada e nao acertadamente, com o proposito de verificar os 
efeitos das instrugbes do mesno. 
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A instrugao da linha 230, executada sernpre ao fim de cada ciclo 
do programa, oferece a lista do mesmo no video para observances ou al 
teragQes eventuais. Apos efetua-las: 

Tecle RUN e NEW LINE novamente. 

Repare nas linhas 10, 130 e 140. A linha 10 coloca uma variavel 
em uso e lhe atribui o valor 0. A linha 130 lhe atribui a fungao de 
contadora, isto e, toda vez que o canputador executa sua instrugao - 
o que e feito somente se a resposta a pergunta da linha 60 for consi- 
derada errada pela execugSo da linha 90 * a mesma sofre acrescuno de 
U A linha 140 verifies se a variavel ja contou as 5 chances para res 
posta errada e, em caso positive, desvia a execugao do program para 
a linha 180. Verifique o que esta linha e a seguinte fazem. 

Note tambem, na linha 80, outra maneira de denominar uma varia¬ 
vel miner ica. Em vez de usar apenas uma letra, A, P, S ou outra, foi- 
lhe dada a identificagao de PAUS. Essa permissividade do canputador e 
iruito util em programas com uso de nuitas variaveis, quando uma deno- 
minacao especifica a cada uso facilita a elaboragao das instrugDes e 
sua posterior verificagao ou alteragao. 

Repare agora na instrugao da linha 90. Ela poderia ter sido es- 
tabelecida de duas outras maneiras: IF PADSol IREN G0GX) 120 ou IF PA 
US>1 THEN GOTO 120. A linha 50 poderia tanbem ser: IF A$<>"SIM ,T 1HEN 
GOTO 200. 

Estude bem as instrugCes de desvio nas linhas 50, 90, 110, 140, 
170 e 190. 

enmms ikkey$, code e or 

INKEY$: Verifica se alguma tecla e pressionada durante a execu¬ 
gao de um programa e, em caso positivo, aciona o canando correspondent 
te a mesma ou introduz o valor, ou o caracter, ou o codigo da mesma. 

CODE: Fomece o codigo de um caracter do canputador ou do carac 
ter situado em primeiro lugar nuna n string n , codigo esse representado 
por um numero entre 0 e 255, de acordo ccm a tabela de caracteres do 
canputador. 

OR: Elenento operador logico de altemativa (= ou), complemen- 


tar de IF. 

Digite: 10 PRINT , , n ADIVINHE QUAL E A LETRA" 

20 PRINT , ,"(PRESSIONE UMA TECLA)" 

30 IF INKEY$= t,n THEN GOTO 30 
40 IF CODE INKEY$==44 OR CODE INKEY$=52 OR COTE 
INKEY$=58 THEN GOTO 70 

50 IF NOT CODE INKEY$=44 OR NOT CODE INKEY$=52 
OR NOT CODE INKEY$=58 THEN PRINT , /TENTE 
IE N0V0" 

60 GOTO 80 

70 PRINT ,,"ACERTOU, PARAEENS" 

80 FOR A=1 TO 60 
90 NEXT A 
100 CLS 
110 GOTO 10 

Note que as aspas da instrugao da linha 30 n3o s§o as duplas u 
sadas como simbolos graficos, situadas na tecla Q. S3o as usadas nor- 
malmente em "strings" e obtidas atraves da tecla P. 

Tecle RUN e NEW LINE. Tente adivirihar a letra. 

Tecle BREAK para parar o programa. 

Repare bem no canando INKEY$. Durante o andamento do programa 
sua fungao e verificar se qualquer tecla e pressionada. Era caso posi¬ 
tivo, informa o centro de processamento do canputador para as devidas 
agSes. Assim, a instrugao da linha 30 IF INKEY$= ITr! THEN GOTO 30 signi 
fica mais ou menos: "se n3o for pressionada nenhuma tecla, fique espe 
rando", de tal maneira que o programa nao prossegue enquanto isto nao 
for feito. 

A instrugao da linha 40 e interpretada pelo computador cano:"se 
o codigo da tecla pressionada for igual a 44, ou 52, ou 58, entao im- 
prima no video ACERTCU". A linha 50 e facil de ser conpreendida em re 
lag3o a linha 40. 

As linhas 80 e 90 substituem a instrugao PAUSE can alguma vanta 
gem. PAUSE, ao ser executada, faz "trerner" o video, enquanto que FOR 
e NEXT processam a mesma operag3o de espera suavemente. Experiments a 
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substituigSo das linhas 80 e 90: 

Digite; 80 PAUSE 60 

Tecle NEW LINE. 

Digite: 90 

Tecle NEW LINE. 

Tecle RUN e NEW LINE. Observe agora o efeito de PAUSE, depois 
tome a introduzir as linhas 80 e 90 originais e compare. 

Tecle NEW e NEW LINE. 

Digite: 10 FOR A=1 TO 10 
20 NEXT A 
30 PRINT 
40 PRINT INKEY$; 

50 GOTO 10 

Tecle RUN e NEW LINE. Pressione sucessivamente diferentes te- 
clas e note bem como funciona INKEY$. 

Elimine as linhas 10 e 20, rode novamente o programa, pressione 
algumas teclas e note come aumenta a velocidade de execucSo do progra 
ma. Apos o rnesno completar a tela, note a denotagSo 5/30 ou 5/40 que 
aparece no canto inferior esquerdo do video, significando que n3o ha 
mis espago no mesmo para continuagSo do programa. 

Tecle NEW e NEW LINE. 

OCMANDOS PLOT, UNFLOT, AND, 0 0 ± £ 

PLOT: Imprime nos locais determinados por instrugOes um ,T pixel Tr 
(abreviatura de "picture element"), pequeno quadrado correspondence a 
1/4 do tamanho de um caracter grafico normal. Os locais determinados 
s3o apontados pelo encontro de coordenadas - 43 no sentido horizontal 
- e abcissas - 63 no sentido vertical - numeradas a partir de 0 e ini 
ciadas no canto inferior esquerdo da tela. 


UNFL0T: ,f Limpa M ou "apaga" as impressdes feitas por PLOT, sendo 
sua ag2o dirigida atraves das mesmas coordenadas e abcissas usadas pa 
ra seu comando oposto. 

q $ O ct> ; Os comandos caracterizados por setas direcionais - 
localizados nas teclas 5, 6, 7 e 8 - movem os diver sos cur sores de e- 
dig3o, K, L, F e G, e o de programa ou localizagao de linhas de ins- 
trug5es no iresno. Quando conjugados com o comando INKEY$ e instrugOes 
adequadas, rrovimentam no video, nas quatro diregDes, "strings" na for 
m de desenhos ou objetos, prestando-se especialmente para a animagSo 
de jogos. 

AND: Elemento operador de ligagao usado para complementer a de- 
finig3o de uma variavel numerica ou o canando condicionante IF. 

Digite: 10 LET A=30 

20 LET B=20 
30 plot A,B 

40 LET A=A- (INKEY$- , 5 11 AND A>l)+dNKEY$="8 n AND 
A<60) 

50 LET B=B-dNKEy$="6 n AND B>l)+(lMCEY$= l, 7 n AND 
B<40) 

60 GOTO 30 

Tecle RUN e NElLINE. Observe novamente a agio de INKEYS, agora 
conjugada can as fungSes das setas direcionais das teclas 5, 6, 7, 8. 
Pressione uma a uma com um so toque. Depois experxmente manter cada u 
ma pressionada durante algum tempo. Faga desenhos na tela. 

Note que os valores das variaveis A e B s3o alterados pelo co- 
mando INKEY$ das linhas 40 e 50, de forma a que os pontos a receberem 
o PLOT sejam indicados apenas pelo acionamento das teclas direcionais 
ou de moviraentagao. 

Tecle BREAK e NEW LINE. 

Digite: 35 UNPLOT A,B 

Tecle RUN e NEW LINE e repita os movimentos das teclas 5, 6, 7, 
8. E ainda possivel desenhar na tela? 
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Tecle BREAK e NEW LINE. Altere um pouco o programa: 

Digite: 40 IF INKEY$="5" THEN LET A=A-1 AND A>1 

42 IF INKEY$="8" IHEN LET A=A+1 AND A<60 
44 IF A>60 THEN I£T A=60 

Tecle RUN e NEW LINE. Note que o programa continua funcionando 
como antes. As linhas 40, 42 e 44 apenas desdobraram as instrugSes da 
linha 40 original, ocupando mais "bytes" no computador. 0 desdobramen 
to feito, todavia, permite melhor ccmpreensAo do irecanismo de funcio- 
mento das instrucOes e do proprio programa. Compare e estude as duas 
forties apresentadas. 

Se quiser "treinar" um pouco de desenho no canputador, coloque 
um REM na linha 35, desenhe A vontade, era seguida elimine o programa 
da tnemoria do computador com os canandos diretos: 

Tecle BREAK, NEW e NEW LINE. 

03MAND0 STEP 

STEP: Determina o "passo" de contagem de uma variavel contadora 
(Xi de controle. 

Digite: 10 CLS 

20 PRINT ,,"DIGITE UM NUMER0 E NEW LINE" 

30 INPUT N 

40 PRINT ,,"TABUADA DE: ";N; " > " 

50 LET M=N*10 
60 LET B=0 
70 PRINT 

80 FOR A=N TO M STEP N 
90 LET B=B+1 

100 PRINT TAB 12;N;" * "jB;" = ";A 
110 NEXT A 

120 PRINT ,,"MAIS UM NUMERO? (S=SIM / N=N&»" 

130 IF INKEY$-THEN GOTO 130 
140 IF INKEY$<>"S" THEN GOTO 160 
150 GOTO 10 
160 CIS 
170 LIST 

40 


Tecle RUN e NEW LINE. Note o efeito da funqSo STEP introduzida 
na instrugAo da linha 80. A variavel contadora A e "informada" que de- 
ve contar de N (que recebe um valor do teclado atraves da linha 30) a 
te M (que, pela instrugAo da linha 50, deve ser igual a N*10), dando 
passos (STEP) de tantas unidades quanto for o valor de N. 

Rode o programa algumas vezes para observer bem o efeito do co- 
tnando STEP e das linhas 90 e 100. 

Tecle NEW e NEW LINE. 

Digite: 10 FOR A=0 TO 100 STEP 5 

20 PRINT A; 

30 PRINT 
40 NEXT A 

Tecle RUN e NEW LINE. Observe o efeito do programa. Depois al¬ 
tere o valor de STEP da linha 10. 

Tecle NEW LINE e observe a localizacao do CURSOR de programa. 
Deve estar na linha 40, que foi a ultima digitada. 

Tecle simultaneamente SHIFT e T (tec la 7). Repita ate o CURSOR 
se localizar na linha 10. 

Tecle simultaneamente SHIFT e EDIT. A linha 10 sera reproduzida 
no local de edigAo de programas ou instrugSes. 

Tecle simultaneamente SHIFT e —>(tecla 8), repetindo o movimen- 
to ate o CURSOR se localizar apos o numero 5. 

Tecle simultaneamente SHIFT e RUBOUT, o que "apagara" o numero 

5. 

Digite 10. A linha no local de edigAo devera ficar assim: 10 

FOR A=0 TO 100 STEP 10. 

Tecle NEW LINE para "mandar" a linha alterada para seu lugar no 
programa. 

Antes de rodar de novo o programa, lenibre-se: use o processo a- 
r-ima quando quiser alterar ou corrigir algurna linha de programa. Caso 
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o programs seja muito extenso e o cursor se achar muito afastado, Ce¬ 
de LIST, mais o numero da linha desejada e NEW LINE. 0 programs apare 
cera listado no video a partir dessa linha. Bastara entSo pressionar 
simultaneamsnte as teclas SHIFT e EDIT a fim de que a mesma seja repro 
duzida no local de edigSo, para alteragSo ou correg2o. Rode em seguida 
o programs: 

Tecle RUN e NEW LINE. Note qual foi o passo de contagem da varia 
vel A depois da alteracSo da linha 10. Experimente outros passos, alte 
rando o limite da variavel A para 500, por exemplo. 

Tecle NEW e NEW LINE. 

Digite: 10 FOR A=20 TO 0 STEP -1 

20 PRINT AT A, A; "SUBIDA" 

30 NEXT A 
40 CLS 

50 POR A=0 TO 20 STEP 1 
60 PRINT AT A,A;"DESCIDA" 

70 NEXT A 
80 CLS 

90 POR A=20 TO 0 STEP -1 
100 PRINT AT 20-A,A+5;' ’DESdDA" 

110 NEXT A 
120 CLS 

130 POR A=0 TO 20 STEP 1 
140 PRINT AT 20-A,A+5; "SUBIDA" 

150 NEXT A 
160 CLS 
170 GOTO 10 

Tecle RUN e NEW LINE. Deixe o programs rodar urn pouco. Analise 
os efeitos das diferentes instrugSes de contagem ascendente e descen- 
dente. Note as diferengas entre as linhas 20 e 140, 60 e 100. 

Tecle BREAK. 

Tecle COOT e NEW LINE. 

Tecle STOP e note que este comando n2o tern nerihum efeito em pro- 
gramas em movimento como o acima, isto 6, "rodando". 


42 


Tecle BREAK e NEW LINE. Estude as instrugSes para PRINT das li¬ 
nhas 20 , 60, 100 e 140. Compare-as em fung2o das atribuigSes feitas a 
variavel A que, como contadora, vai se alterando, ocasionando modifies 
g3es nos locais onde deve se dar o PRINT. 

Tecle NEW e NEW LINE. 

QOMAKDO CHR$ 

CHR$: Fomece o sinibolo ou caracter representado por um codigo 
do computador, de numero entre 0 e 255. 

Digite: 10 PRINT "DIGITE UM NUMERO ENTRE 0 E 255" 

20 PRINT (EM SEGUIDA TECLE NEW LINE)" 

30 INPUT N 

40 PRINT ,,"0 NUMERO ESCOLHIDO, ";N 
50 PRINT , ,"E 0 CCDIGO DO CARACTER: ";CHR$ N 
60 PRINT , ,"TODOS OS CARACTERES 0U SIMBOLDS DO 
TK TEM UM NUMERO EE CODIGO" 

70 PRINT ,,"PAR4 OOOTTMJAR APERIE DMA TECLA" 

80 PAUSE 4E4 
90 CLS 
100 GOTO 10 

Tecle RUN e NEW LINE. Use o programs para conhecer os caracte- 
res e os simbolos ou palavras dos proprios canandos ou fungOes do TK a 
traves do comando CHR$ da linha 50. Observe tambem a funglo da linha 
80. Apos cada rodada do programs ela faz com que o resultado ou efeito 
do programs permanega no video para exame ate que qualquer tecla seja 
oressionada, quando ent2o o programa passa para outra rodada. 

Tecle similtanearrente SHIFT e STOP quando o CURSOR L estiver no 
canto inferior esquerdo do video, indicando que o corputador aguarda a 
entrada - via digitagSo - de um numero para a variavel N da linha 30. 

Tecle NEW LINE e NEW LINE (2 vezes), a fim de que o programa se¬ 
ja listado no video. Estude-o mais uma vez. 

Com relagSo a lista dos simbolos dos comandos e dos caracteres 
do TK, cabe observar aqui que os numeros 67 a 111, 122 a 125 e 195 n3o 
s2o usados. Alguns outros, por exemplo 112 a 121, 126 e 127 referem-se 
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a certos comandos e fun^oes dos qua is o computador fornece apenas um 
sinal de interrogaqSo quando lhe s3o solicitados os simbolos. 

Tecle NEW e NEW LINE. 

Para ver a lista completa dos codigos referidos: 

Digite: 10 FOR A=0 TO 255 

20 SCROLL 

30 PRINT A;" = fl ;01R$ A 
40 NEXT A 

Tecle NEW e NEW LINE quando cessar a exibigSo dos codigos, caso 
n§o queira ve-los novamente. 

Digite: 10 PRINT PRESSIONE IMA TECIA QUALQUER” 

20 PRINT ,,"(LEMBRE-SE: NEW LINE EM SEGUIDA)" 

30 INPUT A$ 

40 PRINT , , n A TECLA PRESSIONADA, n ;A$;", n 

50 PRINT ,,"CORKESPONDE AO CODIGO IT ;C0DE A$; M DO TK" 

60 PRINT ,, II PARA 00NTINUAR APER3E UMA TECLA" 

70 PAUSE 4E4 
80 CLS 
90 GOTO 10 

Tecle RUN e NEW LINE. Estude a instruqSo da linha 50. Deduza a 
fungSo exercida pelo comando ODE. 

Note que a instrugao da linha 30 faz o CURSOR L aparecer entre 
aspas no canto inferior esquerdo do video, pois a instrugSo INPUT A$ 
introduz uma variavel alfanumerica, que e tratada como "string” , cocno 
ja foi vis to. Observe tarabem as instruqSes da linha 50, estabelecidas 
de maneira a que o numero de codigo do simbolo seja impresso entre as 
duas partes da frase. 

Convem ainda lembrar que para interromper um programs que aguar 
da definiq3o para uma variavel alfanumerica os seguintes passos sSo ne 
cessarios: 

- teclar simultaneamente SHIFT e EDIT; 
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- teclar simultaneamente SHIFT e STOP; 

- teclar duas vezes seguidas NEW LINE para ter o program lista- 
do no video; ou: 

- teclar NEW e NEW LINE para zerar o computador. 

OOMANDO GRAPHICS 

GRAPHICS: Permite que os caracteres enquadrados nesta modalida- 
de sejam introduzidos e inverte o modo de impress 3o de outros caracte¬ 
res para branco com fundo preto, isto e, em video inverso. 

Lembre-se que o comando GRAPHICS deve ser acionado srmultaneamen 
te com a tecla SHIFT para que os caracteres graficos possam ser intro¬ 
duzidos, e que as teclas destes devem ser acionadas juntamente can a a 
ludida tecla SHIFT. No uxxio grafico os denials caracteres s3o introduzi 
dos normalmente em video inverso. A reversSo ao tnodo normal e operada 
pressionando-se novamente a tecla GRAPHICS simultaneamente com SHIFT. 

Digite: 10 FOR 0=1 TO 176 

20 PRINT ” ” (4 espaqos an video inverso) 

30 NEXT C 
40 LET A=1 

50 LET B=2+INT (KND*17) 

60 LET C=2+INr (KND*28) 

70 LET D=2+INr (RND*17) 

80 LET E=2+MF (END*28) 

90 PRINT AT ByC; 1 **” (* em video inverso) 

100 FOR 1=1 TO 30 
110 NEXT I 

120 PRINT AT B.C; 11 ” (1 espaqo em video inverso) 

130 PRINT AT DjE; 11 * 11 (* an video inverso) 

140 LET A=A+1 

150 IF A=30 THEN STOP 

160 GOTO 50 

Tecle RUN e NEW LINE e ponha estrelas no ceu do video, e claro! 
Observe o efeito das linhas 10 e 20, que poderiara ser: 

10 FOR C=1 TO 704 

20 PRINT ” fT ; (1 espaqo em video inverso) 

ou: 
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10 FOR C=1 TO 88 

20 PRINT " "j (8 espagos em video inverso) 

Em tempo: Os espagos em video inverso s3o obtidos acionando-se 
o comando GRAPHICS e em seguida a tec la SPACE. 

As altemativas propostas para as linhas 10 e 20 baseiam-se no 
fato de que para "encher" o video s3o necessarios 704 caracteres, que 
podem ser obtidos de varias maneiras, das quais tres s3o as expostas. 

As linhas 40, 140 e 150 controlam os ciclos das instrugSes PRINT 
que colocam estrelas no ceu. As linhas 50 a 80 sorteiam os locais para 
surgimento das estrelas, que s3o colocadas no ceu pelas linhas 90 e 
130. A linha 120 retira a estrela colocada pela linha 90, ou, nelhor, 
apaga-a, causando a sensagSo de lampejos. 

Rode o programs ainda algutnas vezes e note corro mudam os locais 
de surgimento das estrelas, em fungao das linhas 50 a 80. 

Tecle NEW e NEW LINE ao terminar um ciclo do programa. 

Produza agora um letreiro luminoso de multiplos efeitos, usando 
os caracteres graficos do TK, realnente interessantes: 


Digite: 


10 FOR 0=6 TO 25 

20 PRINT AT 9,C;"*" (* em video inverso) 

30 PRINT AT 11 (* em video inverso) 

40 NEXT C 

50 PRINT AT 10,6;"*";AT 10,25;"*" (* em video. 

60 PRINT AT 10,7;" BASES E BASIC TK " lnver so) 
70 FOR C=6 TO 25 STEP 2 
80 PRINT AT 9,C;"*" 

90 PRINT AT 9,C;"*" (* em video inverso) 

100 NEXT C 


110 PRINT AT 10,25;"*" 

120 PRINT AT 10,25;"*" (* em video inverso) 


130 PRINT AT 10,7;" BASES E BASIC TK 
140 FOR C=25 TO 6 STEP -2 


M 


, (em vir 
deo inverso) 


150 PRINT AT 11,C;"*" 

160 PRINT AT 11,C;"*" (* em video inverso) 

170 NEXT C 
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(* em video inverso) 


180 PRINT AT 10,6;"*" 

190 PRINT AT 10,6;"*" 

200 FOR C=1 TO 6 
210 PRINT AT 10,7;" NELSON CASARI " 

220 PRINT AT 10,7;" NELSON CASARI " (em video 

230 NEXT C inverso) 

240 GOTO 60 

Tecle RUN e NEW LINE e estude ban o desempenho do programs. De- 
pois veja em conjunto todos os caracteres graficos e de video inverso 
do TK com o seguinte programa: 

Digite: 10 LET L=0 

20 LET T=0 
30 FOR A=1 TO 10 

40 PRINT AT L,T:CHR$ A;"=";"C ";A 
50 LET L=L+1 
60 NEXT A 

?0 FOR A=128 TO 191 

80 PRINT AT L,T;CHR$ A;"=";"C ":A 

90 LET L=L+1 

100 IF L=19 THEN LET L=0 

110 IF PEEK 16442=5 THEN LET T=T+8 

120 NEXT A 

130 PRINT TAB 24;"C=G0DIG0" 

140 POKE 16418,0 
150 PRINT 

160 PRINT ,,"AI ESTSO OS CARACTERES GRAFICOS E DE 
VIDEO INVERSO DO TK E SEUS RESPECTIVOS CQDIGOS. 
ELES SERSO" 

170 PRINT TAB 7;"MUIT0 UTEIS A VOCE LOGO." 

Tecle RUN e NEW LINE. Visualize bem todos os interessantes recur 
sos graficos do TK. Eles serao realnente nuito uteis na elaboragSo de 
desenhos, jogos animados e textos sobre os quais se queira destaque es 
pecial, inclusive titulos. 

Para te-los exibidos no video n2o haveria necessidade de um pro¬ 
grama elaborado cocno o acima. Porem, o mssmo foi necessario para ter 
todo o conjunto de tais caracteres, mais seus codigos respectivos, im¬ 
presses de uma so vez no video, e com a estetica apresentada, a fim de 
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propiciar tuna visSo de conjunto dos mesmos, e ccmparativa. 

A elaborag3o do programa nessa forma, outrossim, teve por finali 
dade adicional demonstrar alguns recursos pouco usuais para se impri- 
irir duas sequencias diferentes de nuireros e dados em quatro segresntos 
subsequentes, utilizando todas as colunas (32) e linhas (24) passiveis 
de serem geradas pelo microcomputador no video, sendo que as duas ulti 
mas linhas so se tomam disponiveis pela manipulagSo da variavel DFSZ, 
do sistema, atraves da instrugSo da linha 140 do programa. 

Outra variavel do sistema utilizada, LINPR, linha 110 do progra¬ 
ma, permite estabelecer o ponto em que a impressSo dos dados deve ser 
interrompida na parte inferior de uma coluna para ser reiniciada na co 
luna subsequente, na parte superior. 

As instrugSes das linhas 10, 20, 50, 90 e 100 canpletam o conjun 
to de instrugSes necessarias para obtengSo da disposigSo descrita, u- 
til para muitas finalidades em coqputagSo de dados, raz3o por que aeon 
selhamos estuda-las adequadamente, para futuras aplicacSes 

As variaveis do sis terra, acinva aludidas, ser3o vistas no capitu- 
lo ORGANIZAQAO EE MEMDRIA DO IK 85. 

OOMANDOS LEN E STR$ 

LEN: Fornece o comprimento de um express3o alfanumerica, ou de 
uma "string", em numero ou quantidade de caracteres. 

STR$: Permite que um numero ou uma expressao numerica sejam tra- 
tados pelo computador corns "string" ou expressSo alfanumerica. 

Digite: 10 PRINT ,,"DIGUE 1 PALAVRA, TECLE NEW LINE" 

20 INPUT A$ 

30 PRINT , ,A$ 

40 PRINT ,,"QIDE. DE LETRAS DA MESMA: ";LEN A$ 

50 PRINT ,,"DIGITE 1 NUMERO, TECLE NEW LINE" 

60 INPUT A 
70 PRINT ,,A 

80 PRINT ,,"QTDE. DE DIGIT0S DO NUM.: ";LEN STR$ A 
90 PRINT , ,"PARA 00NTINUAR APERTE UMA TECLA" 

100 PAUSE 4E4 


110 CLS 
120 GOTO 10 

Tecle RUN e NEW LINE. Execute o programa algumas vezes e note o 
desempenho do comando LEN nas instrugSes das linhas 40 e 80. Apos, ten 
te tantoem digitar um frase em vez de uma palavra. LEN mede diretamen- 
te o conprimento de "strings". Porem, para medir uma expressao numeri- 
ca deve ser complementado por STR$, que faz com que a expressao seja 
considerada como "string" para efeito de ser medida. . 

A maneira facil de interremper um programa cccno o acima e quando 
ele se encontra em PAUSE: 

Tecle BREAK e em seguida NEW e NEW LINE. 

Digite: 10 PRINT ,, "DIGITE UMA PALAVRA OU UMA FRASE" 

20 PRINT ,,"(DEPOTS TECLE NEW LINE, CERT0?)" 

30 INPUT A$ 

40 LET B$="" 

50 FOR C=1 TO LEN A$ 

60 LET B$=B$+"=" 

70 NEXT C 
80 PRINT , ,A$ 

90 PRINT B$ 

100 PRINT ,,"LETRAS E ESPAgOS UTILIZADOS: ";LEN A$ 
110 PRINT ,,"PARA C0NTINUAR APERIE UMA TECLA" 

120 PAUSE 4E4 
130 CLS 
140 GOTO 10 

Tecle RUN e NEW LINE. Veja agora a ag3o de LEN aplicada na vari¬ 
avel contadora da linha 50, depois de "medir" a palavra ou frase atri- 
buida a variavel A$. Note tamhem, na lixiha 40, a atribuigSo feita a va 
riavel B$: que equivale a um "string" vazia, podendo ser defini- 

da depois, o que permite a execugSo da linha 60, que cria para a pala¬ 
vra ou frase entrada um sublinhado de tamanho equivalente e que e mos- 
trado pela execugSo da linha 90, 

/ 

Na linha 100 de novo LEN, medindo as letras e os espagos utiliza 
dos por A$ e fomecendo o resultado. 


48 


49 



Depois de rodar o programa algumas vezes: 

Tecle BREAK. 

Tecle LIST 60 e NEW LINE. 

Tecle SHIFT e EDIT simultaneamente. Estando a linha 60 no local 
de edigao: 

Tecle SHIFT e a tecla 8 com a seta apontando par a a direita ate 
o cursor postar-se apos 1 ~ T \ 

Tecle SHIFT e RUBOUT ate eliminar as duas aspas e o sinal de i- 
gualdade. 

Digite: SIR$ C. A linha devera ficar assim: 60 LET 

STR$ C. 

Tecle NEW LINE para a linha 60 voltar corrigida para seu lugar. 

Tecle RUN e NEW LINE. Repare que agora a atribuig^o feita a A$ 
n3o e mais sublinhada. Tin seu lugar a linha 60 coloca os numeros de 
contagem da linha 50, correspondentes sempre ao total de caracteres u 
sados, incluindo os espagos entre as palavras, quando houver mais do 
que uma. 

Verifique que, quanto maior for a atribuigSo feita a A$, mais 
demorada sera a execugSo do programa. Para dar-lne maior velocidade, 
acrescente-lhe os comandos FAST e SLOW. 

OOMANDOS FAST E SLOW 

FAST: Aciona a modalidade rapida de funcionamento do tnicroccmpu 

tador. 

SLOW: Aciona a modalidade de funcionamento denominado lento do 
microcomputador, que e a normal e estabelecida automaticamente quando 
o mesmo e ligado. Quando o canputador estiver em operagSo e for acio- 
nado o comando FAST, para faze-lo voltar ao modo SLCW sera necessario 
acionar esse comando. 

Tecle BREAK e NEW LINE 


Digite: 25 FAST 

105 SLOW 

Tecle RUN e NEW LINE e de algumas rodadas no programa, observan 
do corro mudou o modo e o tempo de execuqSo do mesmo. 

A linha 25 FAST faz com que, apos a entrada do dado solicitado, 
a execug^o do programa passe para o modo rapido, executando as opera- 
gSes de processamanto quatro - 4 - vezes mais rapidamente do que no 
trodo SLCW. No irodo FAST, todavia, o canputador utiliza o video apenas 
para exibiglo do resultado do programa, n2o aparecendo a execugSo se¬ 
quential ou animada do mesmo, como ocorre no modo SLCW. 0 modo FAST e 
utilizado quando o programa obriga a execugOes demoradas de instru- 
gDes canplexas ou de calculos. 

A linha 105 SLCW faz com que o programa re tome seu modo normal 
de execugSo. Podera ser eliminada se se desejar manter o programa ope 
rando apenas no nodo rapido. Experimente faze-lo e note que o video 
"piscara" durante a digitagSo de dados de entrada, em consequencia da 
velocidade de operagao. 

Tecle BREAK, NEW e NEW LINE. 

Digite: 10 FOR A=1 TO 704 

20 PRINT 
30 NEXT A 

Tecle RUN e NEW LINE. Observe a velocidade de execugSo do pro¬ 
grama, que esta sendo executado em SLCW, pois quando o canputador e 
"zerado" por NEW e NEW LINE, ele passa a operar automaticamente nesse 
modo. Observe mais uma ou duas vezes. Depois: 

Tecle NEW LINE. 

Digite: 1 FAST 

Tecle NEW LINE para introduzir a linha no programa. 

Tecle RUN e NEW LINE. Compare agora a velocidade do programa, a 
pos a introdugSo do canando FAST. Repita a rodada. 

Tecle NEW LINE. 
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Digite: 1 

Tecle NEW LINE para eliminar a liriha 1 do program. 

Tecle FUN e NEW LINE. Observe que, mesne n3o estando mis no pro 
gram o cccnando FAST, o modo de operagSo permanece assiin. Para voltar 
ao modo SLOT sem mudar o program: 

Tecle SLOW e NEW LINE. Em seguida: 

Tecle RUN e NEW LINE. Apos o program parar: 

Tecle FAST e NEW LINE. Em seguida: 

Tecle RUN e NEW LINE. 

Lembre-se de que SLOW e FAST, bem cono outros comndos diretos, 
podem operar sem coostarem de instrugCes do program. 

Tecle NEW e NEW LINE. 

Experimente mis um pequeno program em SLOT e FAST: 

Digite: 10 PRINT "MOVIMENTO EM SLOT" 

20 FOR C=1 TO 320 

30 PRINT "0"; (0 em video inverso) 

40 NEXT C 

50 PRINT "AIENgSO / AGORA SERA EM FAST" 

60 FOR C=1 TO 100 
70 NEXT C 
80 FAST 

90 FOR C=1 TO 320 

100 PRINT "0"; (0 em video inverso) 

110 NEXT C 
120 SLOT 

130 FOR Ol TO 100 
140 NEXT C 
150 CLS 
160 GOTO 10 

Tecle RUN e NEW LINE. Depois de comparar bem as velocidades: 


Tecle BREAK, NEW e NEW LINE. 

00MANDO VAL 

VAL: Fomece o valor numerico de um "string" ou de uma expres 
s3o alfanumerica, quando esse valor existe e e distinguivel pelo com- 
putador. 

Digite: 10 PRINT "DIGITE l NUMERO, TECLE NEW LINE" 

20 INPUT A 

30 PRINT ,,"PRIMEIRO NUMERO (A): ";A 
40 PRINT ,,"OUTRO NUMERO, TECLE NEW LINE" 

50 INPUT B 

60 PRINT ,,"SEGUND0 NUMERO (B): ";B 
70 LET A$=STR$ A 
80 LET BS-STR? B 

90 PRINT , ,"SCMA DE A E B = ";A+B 
.100 PRINT ,,"SCMA DOS 2 EM STRINGS (A$+B$) = 

A$+B$ 

110 PRINT , ,"SCMA DE VAL A$ E VAL B$ = ";VAL A$ 

+VAL B$ 

120 PRINT , ,"PARA CONTINUAR APER2E UMA TECLA" 

130 PAUSE 4E4 
140 CLS 
150 GOTO 10 

Tecle RUN e NEW LINE. Note que, a iim de dar um ideia t§o niti 
da quanto possivel das fungSes VAL e STR$ (esta vista antes), o pro¬ 
gram primeiramnte introduz duas variaveis numericas atraves das li- 
nhas 20 e 50. Nas linhas 70 e 80 transform essas variaveis, por meio 
do comndo STR$, em "strings", para que, atraves das operacSes arit- 
meticas das linhas 90, 100 e 110, possa ser melhor entendida a rung3o 
VAL, que trata o conteudo numerico de um "string" corn valor, quando 
este pode ser entendido cotto tal pelo computador. Repare ban na dife- 
renga de resultados das linhas 100 e 110: se A$="1250" e B$="750", a 
linha 100 fomecera o resultado "1250750", enquanto a liriha 110 dara 
2000 corn resultado, em razSo de a fung3o VAL tratar corn valores a- 
ritmeticos os conteudos de A$ e B$. 

Aparentemente de pouco alcance ou finalidade, os comandos VAL 
e STR$, todavia, tern grande valia na programagao geral e em especial 
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na matematica e financeira. Seu pleno alcance, todavia, so poderd ser 
devidamente avaliado 3 medida em que o usuario for avangando na utili- 
zag2o pratica do computador. 

Rode o programa algumas vezes, introduzindo valores bem varia- 
dos, e analise detidamente os resultados para melhor compreensSo dos 
comandos utilizados. Quando se der por satisfeito: 

Tecle BREAK quando o cursor n2o estiver no video. E apos: 

Tecle NEW e NEW LINE. 

QDMANDQ DIM 

DIM: Reserva espago na memoria do computador para conjuntos de 
variaveis numericas e alfanumericas, cuja utilizagSo e processamento 
num programa s3o feitos com indexagSo, atraves de variaveis de contro- 
le ou contadoras. Dm con junto de variaveis indexadas e chamado de Tt ni- 
nho 1 ' ou "array* 1 . 

Digite: 10 DIM A$(5,16) 

20 DIM A(5) 

30 DIM B(5) 

40 FOR C=1 TO 5 

50 PRINT DIGITS A MARCA DE DM CARRO" 

60 PRINT ,,"SERA0 5. ESTE E 0 NUM. ";C 
70 INPUT A$(C) 

80 PRINT A$(C) 

90 PRINT ,, n DIGITE 0 ANO DE FABRICAQ&) ,f ; 

100 INPUT A(C) 

110 PRINT A(C) 

120 PRINT , DIGITE SEU VALOR EM MHH0ES CR$" 

130 INPUT B(C) 

140 PRINT B(C) 

150 CLS 
160 NEXT C 

170 PRINT ,,,,TAB 6;’VEICUL0S DISFONIVEIS" 

180 PRINT ,,, > ,1 VEICUlO n ;TAB 18; n AN0";TAB 27; ,f PREgO" 

190 FOR C=1 TO 5 

200 PRINT ,,A$(C);TAB 18;A(C);TAB 32-LEN SIR$ B(C);B(C) 
210 NEXT C 
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Tecle RUN e NEW LINE e atenda as solicitagSes do programa atraves do 
video. Ao fim da execugao do programa - notag2o 0/210 - uma tabela es- 
tara presente no video. 

Nas linhas 10, 20 e 30 o comando DIM permitiu o dimensionamento 
da tabela: 5 NCMES, 5 VALORES e mais 5 VALORES, atraves de A$(5,16) pa 
ra os nones e ACo) e BC5) para os valores ou dados numsncos. 0 numero 
16 colocado apos o 5, na variavel alfanurrerica A$, reserva espago na 
nem5ria do computador para 5 ncxnes de ate 16 digitos cada um, que deve 
r3o ser introduzidos atraves do comando INPUT da linha 70. Os valores 
ou dados numaricos para as variaveis A e B entram atraves da execugao 
das linhas 100 e 130. Para as variaveis numericas n2o ha necessidade 
de especificar a extensao em digitos dos dados numericos. 

A solicitac2o de dados para a tabela, feita pelo computador, de- 
pende do controle da variavel contadora C, atraves do lago ou ’loop" 
feito pelas linhas 40 e 160. 

Apos a entrada de dados, as linhas 170 e 180 "rotulam" a tabela, 
que passa a ser impressa pela execugSo das linhas 190, 200 e 210, tarn- 
bam sob controle da variavel contadora C. 

Note que em todas as instrugSes de entradas de dados e exibigSo 
dos mesiros a variavel contadora C esta vinculada Centre parenteses), a 
fim de manter os tres elementos de cada item - none, ano e valor - cor 
relacionados pelo mesmo indice. 

Os mais variados dimensionamentos de tabelas podem ser feitos no 
TK, deosndendo apenas da capacidade em ir bytes ,T de sua memoria RAM. Por 
exemplo, uma tabela com 200 itens, com 2 titulos e 3 valores para cada 
item, node ser perfeitamente dimensionada num TK 85, cuja capacidade e 
de 16 Kbytes, como minino normal, para a area de programas. Bastara in 
troduzir as instructs DIM A$(200,15), DM B$(200,15), DIM A(200), DM 
B(2O0), DIM C(200). Naturalmente, as letras para as variaveis n2o pre- 
cisam ser as prirreiras do alfabeto, nem estar na ordem conum. Podem 
ser escolhidas N, X, Q etc., sendo necessario apenas cuidar em n3o di 
mensionar duas variaveis da mesma ordem com uma mesma letra, o que fa¬ 
ta lmante ocasiona erro e para li sag So do programa. Por outro lado, nada 
impede que uma variavel numerica e outra alfanumdrica utilizem a mesma 
letra, ja que a segunda e diferenciada pelo caracter $, que deve acom- 
panha-la sempre e e facilmente distinguivel pelo computador. 
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Experimente nudar as dimensOes das variaveis da tabela do ultimo 
programa para 10 ou 20, por exemplo, n£o esquecendo de alterar tambem 
as instrugOes das variaveis contadoras das linhas 40 e 190. Depois de 
estudado o programa: 

Tecle NEW e NEW LINE. 

CCMANDOS PEEK E POKE 

PEEK: Eomece o codigo decimal contido num ,! byte n ou enderego de 
terminado pela instrugao. Em outras palavras: e o conteudo desse ,T by- 
te", na forma de um numero decimal entre 0 e 255, podendo representar 
una instrugao ou um caracter. 

POKE: Carrega o !r byte n ou enderego detexminado com um codigo de¬ 
cimal entre 0 e 255, correspondence a uma instrugao ou caracter. 

Digite: PRINT PEEK 20000 

Tecle NEW LINE e anote o numero que aparece no canto superior es 
querdo do video. Em seguida: 

Digite: POKE 20000,38 


se a digitagao feita teve alguma validade: 

Digite: 10 POR 020000 TO 20004 

20 PRINT PEEK C; M = CODIGO DO ENDEREgO n ;C 
30 NEXT C 

Tecle RUN e NEW LINE e note que os numeros que aparecem no vi¬ 
deo como codigos dos enderegos que os seguem s3o aqueles introduzidos 
pelo comando POKE atraves da digitagao das cinco linhas anteriores. A 
verificagao foi feita pelo comando PEEK colocado na linha 20 do peque 
no programa feito para permitir uma visual izagao de con junto dos cin¬ 
co registros feitos pela instrugao ou comando POKE* 

0 comando PCKE permite colocar os codigos de funcionamento e os 
dos caracteres do microcomputador diretamente nos seus diversos "ende 
regos" ou T, bytes M , diferentemente da linguagem BASIC, que se vale do 
interpretador existente no computador para efetuar a mesma operagao, 
necessaria para seu desempenho. Para entender melhor o que e quais os 
enderegos s3o no microcomputador, leia o capitulo ORGANIZAgAD DA MEMO 
RIA DO IK 85 E AS VARIAVEIS DO SISTEMA. 

Como vimos, o comando PEEK verifies e informa, atraves do canan 
do PRINT, quais s3o os codigos contidos nos T Tbytes 11 indicados. 


Tecle NSW LINE. 


Digite: PRINT PEEK 20000 


Tecle NEW LINE e note que agora o numero fomecido pelo computa¬ 
dor e o que foi carregado pelo comando PCKE no enderego ou ? hyte n de 
numero 20000, ou seja o codigo 38. Prosseguindo: 


Digite: PCKE 20000,62 
Digite: PCKE 20001,156 
Digite: PCKE 20002,215 
Digite: POKE 20003,24 
Digite: PCKE 20004,248 


Tecle NEW LINE em seguida. 
Tecle NEW LINE em seguida. 
Tecle NEW LINE em seguida. 
Tecle NEW LINE em seguida. 
Tecle NEW LINE em seguida. 


Repare que apos pressionar NEW LINE aparece no canto inferior a 
esquerda do video a notagSo 0/0, indicando que a instrugao foi cumpri- 
da, n3o obstante nao haver linha numerada de programa. Verifique agora 


Atraves das cinco linhas digitadas acima com o comando POKE in- 
troduzimos no computador um pequeno programa em linguagem de maquina, 
o qual, utilizando rotinas residentes no microcomputador - que nao de 
pendem de programagSo a ser feita pelo usuario - imprime no video um 
painel que o "enche" completamente com um caracter escolhxdo entre os 
seus diversos. 

Como dissemos, e um pequeno programa em linguagem de maquina e, 
como tal, nao pode ser rodado pelo comando RUN da linguagem BASIC. Pa 
ra roda-lo, faz-se necessaria a utilizagao do comando USR. 

Chtro rato a ser mencionado e que programas em linguagem de ma- 
quina n3o sao feitos can linhas de instrug<3es numeradas, como os vis- 
tos ate agora, em BASIC. A programagao em linguagem de maquina e fei¬ 
ta colocando-se diretamsnte nos enderegos da RAM, que sera vista mais 
adiante, ou nos Th bytes n da mesm, os codigos de funcionamento e de es 
truturagao de programas desse tipo. 
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CCMANDO USR 


USR: Permite acesso direto a qualquer "enderego" ou "byte" das 
memorias RCM e RAM do computador, para execuglo de subrotinas ou pro- 
gramas em linguagem de maquina. 

Rode agora o pequeno programs feito em linguagem de maquina: 

Digite: RAND USR 20000 

Tecle NEW LINE e admire o painel no video. Em seguida: 

Digite: POKE 20001, 134 - Tecle NEW LINE em seguida. 

Digite: RAND USR 20000 - Tecle NEW LINE em seguida. 

Experimente depois "POKEAR" o mssmo enderego 20001 com codigos 
coho 5, 23, 61, 219 e outros. N3o mexa nos enderegos 20000, 20002, 

20003 e 20004, sob pena de o computador entrar em confusSo, "saindo 
do ar", e ter que ser desligado e religado, com a perda do programs. 

Programas em linguagem de maquina s3o senpre criticos, por me- 
nores que sejam, e qualquer pequeno erro pode por o program a perder 
facilrrente, quase sempre fazendo o ccmputador "sair do ar". 

Tecle NEW e NEW LINE. 

0 program apresentado a seguir, utilizando tambem os comandos 
POKE, PEEK, RAND e USR, ilustra outra maneira de introduzir instru- 
gSes em linguagem de maquina, atraves de codigos hexadecimais, quase 
sempre utilizados para essa finalidade. 0 programs introduz tambem ou 
tros recursos, cuja analise sera de valia para utilizagSes futuras: 

DIGITE: 10 LET A=20000 

20 LET B=1 
30 LET 02 

40 LET A$- '3E9CD718F8ST'' 

50 PRINT ,,,,"DIGITE 0 00DIG0 HEXADECIMAL: 

A$(B);A$(C) 

60 PRINT , ,"(A SEGUIR TECLE NEW LINE)" 

70 INPUT A$ 


80 IF A$="ST" THEN GOTO 190 
90 POKE A,CODE A$*16+€0DE A$(2)-476 
100 LET D=PEEK A 

110 PRINT , ,CHR$ (INI (D/16)+28);CHR$ (D-INT (D/16)* 
16+28);" = HEXADEC. EQUIV. AO DEC. "?D 
120 POR 1=1 TO 120 
130 NEXT I 
140 LET A=A+1 
150 LET B=B+2 
160 LET C=C+2 
170 CLS 
180 GOTO 40 
190 CLS 

200 PRINT "ST = SUSTA ENTRADA DE CODIGOS" 

210 PRINT "VOCE INTRODUZIU UM PR0GRAMA EM" 

220 PRINT "LINGUAGEM DE MAQUINA A PARIIR DO" 

230 PRINT "ENDEREgO 20000. PARA RCDA-L0 TE-" 

240 PRINT "CLE RAND USR 20000 E NEW LINE." 

250 PRINT ,,'"DEPOIS VERIFIQUE SE CCMPREENDEU." 

Tecle RUN e NEW LINE. A medida que o programs vai sendo executa 
do, proceda de acordo com as instrugSes que o mestno coloca no video. 
Depois rode-o tnais algums vezes can o fito de estuda-lo. 

Observe bem a ac2o da linha 90, cujo efeito e demonstrado atra¬ 
ves da rung2o da linha 110. 

Tente ccmpreender como a "string" da variavel A$ e "fatiada" pe 
la fung2o da linha 50, com auxilio das variaveis Be C, cuja increment 
tag2o e feita nas linhas 150 e 160 para efeito de prosseguir com o fa 
tiarrento, que e urn recurso muito interessante do conputador para mani 
pular "strings". 

Tecle NEW e NEW LINE. 

Digite 1 REM. 

. (43 pantos) 

10 LET E=16514 
20 INPUT E$ 

30 IF E$="S" THEN GOTO 100 

40 POKE E, CODE E$*16+G0DE E$(2)-476 
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50 LET D=FEEK E 
60 SCROLL 

70 PRINT CHR$ (MT (D/16)+28) ;CHR$ (D-INT (D/16)* 
16+28);" ";E 
80 LET E-E+l 
90 GOTO 20 

ioo as 

110 PRINT ,, "DIGITE RAND USR 16546 E NEW LINE" 

Tecle RUN e NEW LINE. 0 CURSOR L no canto inferior esquerdo do 
video estara indicando que e aguardada entrada de dados. 

Digite os codigos hexadecimais que se seguem, um de cada ve 2 , te 
clando NEW LINE apos cada par digitado. Espere sempre o CURSOR L estar 
no seu lugar para digitar um codigo. Lenbre-se sempre de que os codi¬ 
gos hexadecimais s2o sempre constituidos por dois digitos. 

Codigos a introduzir: 39 30 00 24 21 00 16 00 29 34 32 2E 33 2E 
34 00 37 26 35 2E 29 34 00 16 00 33 28 26 38 26 37 2E 11 82 40 01 20 
00 CD 6B 0B C9 S. 

Se tudo foi feito certinho, devera surgir no video a frase da li 
nha 110. Execute-a: 

Digite RAND USR 16546 e tecle NEW LINE. 

N2o se admire de ter surgido no video apenas o titulo deste li- 
vro e o none de seu autor. 

Tecle NEW LINE e observe como ficou a linha 1 REM que foi digi- 
tada com 45 pout os. La est2o todos os simbolos dos codigos hexadecima¬ 
is digitados atraves do program em BASIC. A linha 1 e agora um progra 
ma em linguagem de maquina, cornpleto, errbora pequeno. 

Delete a seguir o program em BASIC, deixando apenas a linha 1. 
A delegao ou eliminagSo e feita, cot o ja vinos antes, digitando-se os 
nurreros das linhas do program, um de cada vez, e teclando NEW LINE em 
seguida. Depois de feita a delegao: 

Digite: RAND USR 16546 


Tecle NEW LINE e constate cono o programa continua complete e 
independente. 

Esse pequeno programa em linguagem de maquina - 42 codigos hexa 
decimals (3 sobraram de reserva) n3o conseguem fazer um grande pro¬ 
grama, realmente- foi elaborado com a finalidade de demonstrar sucin- 
tamente a estrutura basica desse tipo de programg3o, a fim de susci- 
tar algumas consideragCes: 

Se for consul tada a tabela de carac teres do TK, sera vis to que 
a letra T tern o codigo hexadecimal 39, a letra K o codigo 30, o espa- 
go o codigo 00, o hifen o 16 etc. Assim, para escrever em linguagem 
de maquina a frase toda, contando tanibem os espagos entre as palavras, 
codigo 00, foi necessaria a utilizagSo de 32 codigos. Os restantes,10, 
constituem as instrugDes para produzir no video a frase. E note que to 
dos os codigos tiveram que ser colocados em "enderegos" consecutivos a 
partir de um predeterminado, condigSo imprescindivel para um program 
em linguagem de maquina. 

0 programa em BASIC das linhas 1 a 110 serviu apenas para intro¬ 
duzir os codigos hexadecimais atraves do comando POKE da linha 40, que 
transforma os mssmos na codificagSo inteligivel para o computador. Po- 
deria o iresmo program ter sido feito para introduzir codigos decimals 
equivalentes, com alguma simpliricag2o. Ocorre, todavia, que os coman- 
dos, instrugDes e fungSes em linguagem de maquina s5o geralmente pro- 
gramados em codigos hexadecimais, tirades da lista de codigos estabele 
cidos pelo fabricante do microprocessador, que assim fomece a equiva¬ 
lence com o sistema binario, que efetivamente comanda o funcionamento 
cerebro-eletronico do computador, mas cuja manipulagSo e inteligibili- 
dade seriam muito pouco acessiveis a grande maioria dos usuarios. 

De form geral, a unica vantagem dos programas elaboradosem lin 
guagem de maquina e a velocidade de processamento, principalmente para 
jogos e alguns tipos de programas complexos, mas nSo ha duvida de que 
sua utilizagSo apresenta dificuldades consideraveis, sendo praticamen- 
te inacessivel se n3o for exaustivamente estudada e decorada, ao con- 
trario da linguagem BASIC, chamada de alto nivel, e realmente inteli- 
gente e extremamente inteligivel. 

A frase utilizada no pequeno programa em linguagem de maquina e 
a titulo de exemplo poderia ser produzida no video, em BASIC, con um 
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simples e rapido comando: PRINT "IK 85 - DCMNIO RAPIDO - NELSON CASA- 
RI m e NEW LINE* 


Deve ser dito, entretanto, que tanto quanto for melhorada a inte 
rag3o usuario-computador, a linguagem de iraquina deve ser aprendida e 
aplicada, principalmente visando obter os melhores rendimentos do fabu 
loso e genial aparelho. 

(X3MANS0S OOPY, ILIST E LPRINT 

Sao utilizados somente quando o computador estiver aeoplado a u- 
ma impressora. Se acionados sem a mesma, nada fazem* 


DESCERRANDO SAVE E LOAD 

Vejamos primsiramente SAVE que, detalhando, e o canando atraves 
do qual os dados de um program existente no computador s2o transforms 
dos em sinais acusticos passiveis de serem gravados em fita K-7 comum 
por intermedio de urn gravador K-7 tambem canum, estando ambos - micro- 
computador e gravador - conectados atraves das respectivas tanadasMIC 
existentes em ambos, e com auxilio de um cabo coaxial padr3o. 


COPY: Envia para a impressora o que estiver na area de merroria 
de video do computador, ou, em outras palavras, o que for exibido pelo 
computador na tela de video, em consequencia da execug3o de um progra¬ 
ma. 

LLIST: Funciona como LIST, enviando a listagem do programa para 
a impressora. 

LPRINT: Funciona como PRINT, usando a impressora em vez da tela 

de TV. 


COMANDOS SAVE E LOAD 


SAVE: Faz com que um programa existente na tremoria do computador 
seja gravado numa fita K-7, atraves de um gravador K-7 comm. 

LOAD: Faz com que um programa previamente gravado em fita padrSo 
K-7 seja carregado na memoria do computador atraves de um gravador K-7 
canum* 

Deixamos propositadamente para o fim deste capitulo a introdug5o 
do uso destes comandos, em razSo de sua estreita ligagSo com um couple 
mento dos mais iirxportantes na utilizagSo do microcanputador: o grava¬ 
dor K-7 e, consequentemente, o armazenamento de programas e dados em 
fita K-7, assuntos que serao tratados nos capitulos seguintes a este e 
cujo conheciitmto e completo dominio devem constituir-se num dos prin¬ 
cipals objetivos do usuario. 

Vamos, pois, abordar tais questOes com a plenitude possivel, pa¬ 
ra que sejam evitados certos problemas que costumam ocorrer* 


Procedimento: Havendo um programa na memoria do computador e es 
tando o gravador preparado para gravar, is to e, conectado ao computa- 
dor confome descrito acima, com fita K-7 de boa qualidade, de prefe- 
rencia virgem, as teclas REC e PLAY do mesmo devem ser acionadas, de- 
vendo ser logo em seguida acionado o comando SAVE e pressionada a te- 
cla NEW LINE do computador. AtengSo! 0 canando SAVE devera serdigita- 
do com qualquer identificagao, isto e, devera ser seguido de um none, 
entre aspas, de preferencia o do proprio programa, sera o que nSo fun- 
cionara. Exemplo: SAVE '*PING PONG 11 . Essa identificagao podera ser uti 
lizada depois, quando o programa tiver que ser carregado da fita para 
o computador, para que este procure e selecione o programa na fita, ca 
so a Ttesma tenha diversos programas gravados e n£o tenha sido anotada 
sua localizag5o exata. 

Os gravadores atuais normaImente funcionam com nivel autanatico 
de gravagSo, dispensando qualquer ajuste. Por precaugSo, apenas o con 
trole de tom devera ser rirmado no ponto maximo de reprodugSo aguda. 

Iniciado o processo, a tela de TV ficara acinzentada por aproxi 
madarrente cinco segundos e em seguida aparecerSo na mesma listras ca- 
racteristicas do processo e que indicam que o program esta sendo man 
dado para o gravador. 

As listras se movimentam sucessiva e rapidamente, sendo acompa- 
nhadas de som caracteristico reproduzido pelo alto-falante da TV, som 
que logo se tomara familiar e facilmente reconhecivel. 

Quando a transmissSo de todo o programa tenrnnar, as listras e 
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som caracteristicos cessarSo e aparecera no video, no canto inferior 
esquerdo, a notagSo 0/0, indicando o termino do processor Apenas deve 
ra ser desligado o gravador. 0 programa estara gravado na fita K-7. 

A ilustragSo apresentada a seguir da uma ideia de cono a tela de 
IV se apresenta durante o processo de gravag3o de um programa: 



SAVE - IMAGEM DE VIDEO 


0 programa transmitido para o gravador ainda permanecera no can- 
putador. Podera ser rodado normalmente, usado para outra gravagSo ou a 
pagado pelo processo usual. Se for apenas pressionada a tecla NEW LINE 
ele surgira novamente listado no video. 

Esse e o caso de um programs normal e comm, no qual n3o exista 
uma linha de instrugSo SAVE. 

No caso de programs em que conste uma linha dessa ordem, o co- 
mando para SAVE devera ser feito atraves de GOTO. Exemplificando: se o 
programa tiver uma linha: 

2500 SAVE "PING PONG" 

o comando para gravar devera ser: GOTO 2500 e NEW LINE, naturalmente a 
pos o gravador ter sido acionado em REC e PLAY. 

Quando existe o comando SAVE numa linha de instrugSo do programa 
e quase absolutamente certo que a mesma seja seguida de uma linha de 
instrugao RUN, o que fara can que o programs, apos ser gravado, seja 
autanaticamente posto a rodar pelo conputador. Em tal caso, para grava 


-lo outras vezes, devera ser acionado um dos conandos BREAK ou STOP - 
o que mslhor se aplicar - acionando novanente a seguir o comando GOTO 
mais numero de linha e NEW LINE, n3o esquecendo que o gravador devera 
estar funcionando na modalidade de gravag3o. 

Como sabemos, LOAD e o processo que permite carregar, ou melhor, 
transferir para o microcanputador um programa previamente gravado em 
fita K-7, por interrredio de um gravador K-7 corum, estando ambos - tni- 
croconputador e gravador - conectados atraves das respectivas tomadas 
EAR proprias a ambos e com auxilio de um cabo coaxial conum. 

Procedimento: A fita K-7 com o programa a ser transferido para o 
microcomputador devera ser posicionada no gravador com algum intervalo 
antes do ponto inicial da gravag3o. 0 controle de volume do gravador 
devera ser ajustado entre metade e tres quartos do maximo e o controle 
de tom colocado na posigSo de reprodugSo maxima de sons agudos. 0 co¬ 
mando LOAD devera ser digitado seguido do nome do programa colocado en 
tre aspas, caso a fita n3o possa ser colocada de maneira a que o ponto 
de inicio do programa esteja proximo e antes do cabegote de leitura do 
gravador e tiver que ser localizado na fita pelo conputador. Ou digita 
do apenas seguido de aspas duplas quando o programa a ser carregado e 
o primeiro apds o ponto em que se encontra a fita. Exemplificando, pa¬ 
ra melhor ccmpreensSo: LOAD "PING PONG" ou simplesrrente LOAD"" (aspas 
da tecla P). Em seguida, devera ser pressionada a tecla NEW LINE, dei- 
xando o gravador parado, is to e, sem acionar de imediato a tecla PLAY. 

Iniciado no microcomputador o processo, surgir3o no video riscas 
ou listras caracteristicas, diferentes do processo SAVE, que se movi- 
mentarSo rapidamente no sentido diagonal a direita, cocid se percorres 
sem a tela de alto a baixo. 

Devera entSo ser acionada a tecla PLAY do gravador e, tSo logo 
seja atingido o ponto de inicio de gravag3o, sera reproduzido no alto- 
falante da IV um som caracteristico do processo de carregamento, dife- 
rente do processo SAVE, e as listras do video assumir3o aspecto diver - 
so do inicial. Estas tambem aparentarSo movimento rapido e sucessivo, 
como se tremessem, e deverSo permanecer assim enquanto n3o, se comple- 
tar o processo. Ao termino do mesmo, quando cessarem, devera aparecer 
no canto inferior esquerdo do video a notagSo 0/0, indicando que o pro 
grama "entrou" na memoria do computador. 0 gravador devera ser desliga 
do e o programa podera ser manipulado normalmente no coiputador. 
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A ilustragao apresentada a seguir da urn ideia de corn a tela de 
TV se apresenta durante o processo de carregamento de um programa: 



LOAD - IMAGEM DE VIDEO 


Se o program carregado tiver uma linha de instrugSo SAVE segui- 
da de outra can o comando RUN, entrara "rodando" no computador. 

Se, durante o processo de LOAD, cessarem as listras no video sem 
aparecer em seguida a notagSo 0/0, nSo tendo tambem entrado o program 
rodando, o processo nSo se completou com sucesso, devendo ser reinicia 
do, o que podera ser feito se aparecer o CURSOR K no canto inferior es 
querdo do video* Caso n2o aparega e o video permanecer acinzentado, o 
inicrocomputador devera ser desligado e religado antes de o processo de 
carregamento ser reiniciado, sendo aconselhavel, neste caso, proceder 
a novo ajuste do controle de volum do gravador, posicionando-o pouco 
acim da posigao anterior, Se o volume do gravador es tiver abaixo do 
miniiro necessario ou miito acim do mesmo, geralmente ocorre insucesso 
no carregamento. 


GRAVADOR K-7, A OUTRA METADE DO MICRPCaiPUXADOR 

Embora utilizada aqui como forga de expressSo, a afirmag2o encer 
rada pelo tltulo acima corresponds quase que inteiramente com a reali¬ 
dade, Apenas a proporgSo devera ser retificada, talvez para 1/3, pouco 
rnenos, ja que um microcomputador se toma praticamente imprest avel sem 
um aparelho de TV coro monitor, pouco praticavel sem um gravador, peri 
fericos implementares indispensaveis. 

Os microcatputadores geralmente tem menorias limitadas a niveis 
praticos e economicos, fato muito mis acentuado ccm os chamados de u 
so pessoal. N3o seria bom senso fabrics-los com memorias agigantadas e 
corrplexas, uma vez que os programs normalmente destinados ou exigidos 
pela maioria dos usuarios se caracterizam muito mis por divers if ica- 
gAo do que por extensSo. 

Sua estruturag2o n3o permite a memorizagSo e manipula£§o de mul- 
tiplos programs extensos a um so tempo, o que n2o invalida a necessi- 
dade de te-los e. processa-los separadanente e que patenteia a necessi- 
dade do gravador K-7. 

Certos tipos de microcomputadores mis sofisticados, e mesmo al- 
guns considerados impropriamente de "uso pessoal", s3o ou podem ser m 
plemntados por DISC-DRIVERS em lugar dos gravadores K-7 ccmns, com a 
vantagem em velocidade de processamento e localizagSo mis rapida dos 
programs contidos num disco, ms a um custo iruito mais elevado, consi 
deravelmante mis elevado, que so seria justificado por um utilizag5o 
bastante arnpla e eventualmente profissional. 

Os microcorrputadores atuais produzidos no Brasil, exemplos expo- 
nenciais dos quais o TK 85 e o CP 200, incorporam duas velocidades de 
processamento de fitas K-7: a normal, relativarrente lenta, 300 'bauds 11 
por segundo, e a ultra-rapida, denominada HIGH SPEED, de 4200 unidades 
equivalentes por segundo. Nest a nodal idade, um program de 16 K bytes 
pode ser gravado ou carregado em 30 segundos, o que e realmente miito 
satisfatorio. 
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Praticamente qualquer gravador K-7 pode ser adotado ccxvo conple- 
tiento periferico de um microcomputador, para utilizagSo na trodalidade 
de velocidade normal, n§o se recomendando, todavia, aqueles que neces- 
sitam de conversor extemo, para substituir as pilhas, em raz3o de que 
a maioria dos conversores gera ruidos que s5o captados pelo gravador e 
p5e a perder a gravagao ou o carregamento. Seu uso e simples e pratico 
e exige apenas alguns cuidados especiais: 

1° - Ajuste adequado dos cabegotes, especialmente do de leitura, 
que efetua a gravagao e a reprodugao, com limpeza e desmagnetizagSo pe 
riodicas. Em certas circunstancias o ajuste desse cabegote deve ser al 
terado para que possa ser efetuada can sucesso a leitura de uma fita 
gravada em aparelho can regulagem de cabegote desigyal. 

22 - Uso e manuteng3o apropriados, para que as folgas do mecanis 
mo nAo excedam as tolerancias de forma a comprometer a gravagao e re¬ 
produgao de um programa. 

32 - Nao alimentar o gravador com pilhas quando em uso com o con 
putador, em raz3o de que o desgaste relativamente rapido das pilhas 
provoca alteragOes nas rotagSes do irotor do gravador, pondo a perder 
a gravagao ou o carregamento. 

Ja a uti.lizagSo na modalidade de velocidade ultra-rapida ou HIGH 
S PEED exige que o gravador seja dot ado de cabegote de gravagao e repro 
dugao com alta relagao sinal-ruido e circuito eletronico con faixa am- 
pla de passagem de frequencias altas - responsaveis pelos sons agudos 
- caracteristicas alias consideradas apenas normais nos aparelhos con¬ 
sider ados de primeira qualidade, conquanto conuns, o que, todavia, nSo 
anula a probabilidade de alguns tipos ou marcas n2o se prestarem para 
uso nesta modalidade. 

De qualquer forma, se um gravador K-7 comm de boa qualidade nao 
se prestar para utilizagSo na modalidade HIGH-SPEED, e praticamente ga 
rantido que qualquer radio-gravador, nao estereo, o faga, naturalmente 
us ado apenas cano gravador-reprodutor K-7. 


am AJUSTAR 0 CABECOIE DO GRAVADOR 

A ilustrag3o mostrada a seguir apresenta a disposigSo de fixagao 
dos cabegotes de um gravador: 



No gabinete do aparelho e proximo da tampa do canpartimento alo- 
jador da fita, exatamente acima do parafuso de regulagem do cabegote - 
quando este se encontra deslocado para a frente pelo acionamento da te 
cla PLAY - costuma haver um pequeno orificio que permite o acesso de u 
ma pequena chave de feudal cabega do citado parafuso. 

Quando n3o existir esse orificio, devera ser feito com o auxilio 
de uma pequena broca e com cuidados apropriados. 

Procedimento para ajuste: 

12-0 gravador devera estar desconectado do microcomputador. 

22 - Colocar no gravador uma fita K-7 com programa gravado para 
computadores, de boa qualidade, de preferencia produzida por firma re- 
nomada em SOFTisARE. 

32 - Ajustar o controle de volume do gravador em aproximadamente 
1/3 de sua capacidade e o controle de tonalidade no ponto maximo para 
reprodugao de sons agudos. 


42 - Acionar a tecla PLAY do gravador. 
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OS CONTROLES DE VOLUME E TOM DO GRAVADOR 


59 - Introduzir uma chave de fenda pequena no orificio referido 
e posicionar a mesma adequadanente na fenda do parafuso de regulagem 
do cabegote. 

69 - Com ouvido atento ao son reproduzido pelo gravador, girar a 
chave de fenda suavenente, muito pouco a cada vez, para a esquerda, de 
pois para a direita, a fim de identificar em que posigSo se toma mis 
aguda e tnelhor a reprodugSo da gravagSo da fita. 

79 - Adotar essa posigSo como padr^o para gravagOes proprias, se 
possivel marcando ou nemorizando a exata diregao da fenda do parafuso 
para futuras referencias e retomo no caso de necessidade de eventuais 
alteragQes. 

E sempre oportuno lembrar que, apos 10-12 horas de trabalho efe- 
tivo, os cabegotes do gravador devem passar por cuidadosa limpeza e, 
se possivel, desmagnetizagao. 

A limpeza dos mesmos deve ser feita com produtos apropriados, fa 
cilrrente encontrados no comercio especializado, ou can alcool isopropi 
lico, obtido em drogarias, com ajuda de um cotonete. Jamais devem ser 
usados produtos abrasives. 

A desmagnetizagSo devera ser feita ccm desmagnetizador ou fita K 
-7 produzida para esse‘fim, tairibem facilmente encontrados no comercio. 


Outro ponto que deve merecer atengSo a fim de ser obtido rendi- 
rrento otimizado do gravador, principaimente para fins de carregarrento 
de programs da fita K-7 para o microcomputador, e o que diz respeito 
aos controles de volume e de tcm do gravador e suas posigOes. 

Como ja foi dito, o controle de tom devera estar sempre no ponto 
de limite maximo para reprodugSo de sons agudos. 

0 controle de volume devera ir sendo experimentado a partir dum 
ponto pouco acima do medio de sua capacidade, ate o ponto a partir do 
qual os programs sejam carregados no microcomputador sent obstaculos. 

Se o botSo de controle de volume tiver alguma mrca que permits 
um referenda em relagSo a jane la em que gira, deve ser memorizada a 
sua exata posigSo no ponto acertado, para ser posicionado ali senpre 
antes do inicio do processo de carregarrento. Se n3o tiver nenhuma mar- 
ca, esta podera ser feita con esmalte de unhas de cor clara, can auxi- 
lio de um palito de dentes, num das ranhuras do bot3o, a mais prdxima 
possivel do ponto de melhor visualizagao para o usuario, a fim de faci 
litar o ajuste certo sempre que necessario. 

Deve ser lenibrado que, durante o processo de carregarrento de um 
program, se a imagem no video e o som caracteristicos indicarem norm 
lidade, as posigdes dos controles do gravador n2o devem ser alteradas, 
sob pena de o processo ser interronpido. 


Finalmente, quando possivel, ou pelo menos um vez ao ano, os re 
sistores intemos ou grafites desses concroles, sobre os quais desliza 
o cursor divisor de fensao acionado pelo botao, devem ser lubrificados 
com produto apropriado, geralnente vendido sob a forma de "spray 11 . Es¬ 
se servigo podera ser feito em alguns minutos por um tdcnico especiali 
zado, ou mesmo pelo usuario que sai^a como faze-lo, e evitara proble¬ 
ms eventuais de contacto que poderao prejudicar ambos os processos de 
gravagSo ou carregarrento da fita K-7. 
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52 - Digite no micro: GOTO 60 e tecle NEW LINE. 


LM PROGRAMA PARA SAVE E LOAD 

Apresentamos a seguir um pequeno programa que, alem de servir i- 
nicialmente para fins de experiences e aquisig5o de pratica no dominio 
das fungcfes ligadas ao uso con junto do microcomputador e gravador, po- 
dera depois ser usado com padrSo para verificagSo das condigcSes de en 
trada ou carregamento de programas outros e ajustes do cabe§ote grava 
dor-reprodutor sempre que necessario. Bastara ter senpre disponivel uma 
fita com alguras gravagSes do pequeno programa, que deverSo ser feitas 
corro indicams a seguir. 

Digite: 10 SCROLL 

20 PRINT "CARREGAMENK) OK" 

30 SCROLL 

40 PRINT TAB 16; ff PR£SSIC8SE BREAK 11 
50 GOTO 10 
60 SAVE 1 ’TESTE 11 
70 GOTO 10 

N2o obstante ja terras detalhado os procedimentos de SAVE e LOAD 
em capitulo anterior, vamos repassa-los, agora na pratica, visando di- 
rimir duvidas ou dificuldades, ja que esta parte da microcomputac3o e 
geralmente causa de problemas desgastantes para O'usuario de ranor ex¬ 
periencia. 

Procedimento: 

12 - Conecte o cabo coaxial apropriado nas tomadas MIC do micro- 
ccmputador e do gravador. 

22 - Coloque no gravador um fita K-7 de boa qualidade, de prefe 
rencia virgem, cuidando para que a mesma esteja no ponto inicial. 

32 - Apenas por precaugSo, a juste o controle de tonalidade para 
reprodugSo maxima de sons agudos. 

42 - Acione as teclas EEC e PLAY do gravador. 


62-0 video se tomara acinzentado e dentro de poucos segundos 
surgirSo no rasmo as listras caracteristicas do processo SAVE, confor- 
tte ilustragSo anterior. Logo as rasmas cessarSo e o pequeno programa 
teste estara "rodando" no video. 

72 - Acione a tecla STOP do gravador e em seguida pressione a te 
cla BREAK do microcomputador. 

0 program foi gravado um vez. Faga agora a segunda gravagSo a 
partir do ponto em que parou a fita: 

12 - Acione REC e PLAY no gravador. 

22 - Digite no micro: GOTO 60 e tecle NEW LINE. 

32 - Observe o video e atente para o son caracteristico. 

42 - Quando o programa aparecer ,r rodando TT no video, acione a te¬ 
cla STOP no gravador e BREAK no microcomputador. 

0 program foi gravado pela segunda vez. Faga ainda mis duas ou 
tres gravagDes, repetindo os ul tiros quatro ltens do procedimento. 

Em seguida, passe o cabo coaxial para as tomadas EAR do microcom 
putador e do gravador e proceda como se segue: 

a) - Rebobine a fita K-7 no gravador, colocando-a no ponto ini¬ 
cial, que e a parte colorida ou transparente da fita. 

b) - Tecle NEW e NEW LINE no microcomputador. 

c) - Ajuste o controle de volume do gravador no ponto entre 2/3 
e 3/4 do maxim e o controle de tom no ponto maxim. 

d) - Digite no micro: LOAD ’TESTE 11 ou sunplesmente LOAD nn e te¬ 
cle NEW LINE. 

e) - No video deverSo surgir listras caracteristicas do processo 
LOAD, mvimentando-se no sentido diagonal a direita. 
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£) - Acione a tec la PLAY do gravador. 

g) - Quando for atingido o ponto de inicio da gravagSo na fita 
as listras assumirSo o aspecto caracteristico do processo de carrega- 
nento, conforme ilustragSo ja vista, e o som tambem caracteristico se¬ 
ra reproduzido pelo alto-falante da TV. 

h) - Logo as listras cessarSo e surgira o program teste ,r rodan- 
do ,r no video. 

i) - Acione a tecla STOP do gravador. 

j) - Proceda normalmente ccxn o program no micrbconputador. 

Caso o carregamento n3o se realize, isto e, nSo sejam cumpridos 
os passos ate o final com sucesso, repit a o processo, a partir do pon¬ 
to em que parou a fita - port an to antes da segunda gravagSo - aumsntan 
do um pouco mais o velum de reprodugSto do gravador. Caso este ja este 
ja muito proximo do ponto maximo pode ter sido essa a causa da falhaT 
Diminua o volume, entSo, colocando o controle pouco acima do ponto cor 
respondente a 2/3 de seu cur so. 

Mesmo depois de efetuado o carregamento com sucesso^ repita a in- 
da varias vezes o processo todo de LOAD, atentp a imagem de video e ao 
som, para familiarizagSo mais rapida com o mesmo. 

Una observagSo ainda a ser feita: lenibrar que todo program que 
tenha o comando SAVE como linha de instrugSo, a exemplo do program tes 
te acima, entra em execugSo automaticamente e imediatamente apos com- 
pletar-se o processo de carregamento no microcomputador. 


GRAVAQOES E CARKEGAMENTOS EH HIGH-SPEED 

Os procedimentos, de form geral, s3o os mesmos de SAVE e LOAD, 
diferindo apenas quanto aos canandos: 

Qn vez de SAVE "NCME" 

Digite: RAND USR 8405 e tecle NEW LINE 

(Corresponde a HI-SAVE) 

Em vez de LOAD "KM E" ou LOAD "" 

Digite: RAND USR 8630 e tecle NEW LINE 

(Corresponde a HI-LOAD) 

A modalidade HIGH-SPEED permite tanbem conferir a gravagSo feita 
de um program existente na memoria do ccxnputador. Seu canando e: 

RAND USR 8539 e tecle NEW LINE 
(Corresponde a HI-VERIFY) 

0 uso da fungao HI-VERIFY deve ser feito logo apos ter sido fei¬ 
ta uma gravagSo de um program existente na manoria do ccxnputador. 

0 program do qual foi feita a gravagSo devera ser mantido nor- 
malmnte no computador e devera ser adotado o procedunento enumerado a 
seguir: 


- a fita em que foi feita a gravagSo devera ser rebobinada ate o 
ponto um pouco anterior ao. inicial da gravagSo feita; 

- devem ser conectados pelo cabo coaxial as tomadas EAR do canpu 
tador e do gravador; 

- o volume do gravador deve ser ajustado pouco abaixo da metade 
de seu curso. (Na modalidade HIGH-SPEED o volum para reprodugSo da fi 
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ta deve ser menor do que na modalidade nonral.) 


- deve ser acionado o comando RAND USR 8539 e NEW LINE no compu- 
tador, sendo em seguida posto o gravador a funcionar em PLAY. 

Quando cessarem na TV os sinais caracteristicos do processo de 
carregamento, surgira no video a notag§o n 0K H se a gravag&o estiver 
perfeita, ou "ERRO" se estiver imperfeita. 

No casQ de surgir a notag2o T1 ERRO", repita o processo, alterando 
ligeiramente o mvel de volume do gravador, se nSo estiver ainda fami- 
liarizado com o processo e nSo tiver ainda deteminado o nivel ideal 
de volume para esta modalidade. 

Se persistir a notag2o de Tf ERRO ,? , faga nova gravagSo e repita to 
do o processo, sernpre utilizando o programa existente na memoria do mi 
cr ocanputador . 

0 nivel de volume para carregamentos ou verificagSes em HIGH¬ 
SPEED, respect ivamente HI-LOAD e HI-VERIFY, difere do de ^ carregamento 
em modal idade normal, LOAD, bem como diferem as imagens e sons gerados 
por todo o processo, incluindo HI-SAVE. Mas n2o ha duvidas de que algu 
mas poucas observagOes logo tomar3o o usuario familiarizado com os re 
feridos, especialmente se ja estiver habituado com os processes nor- 
mais de gravagSo (SAVE) e carregamento (LOAD). 

De qualquer maneira, sera sempre aconselhavel fazer varias expe¬ 
riences no inicio, a fim de estabelecer o nivel ideal de volume para 
o aparelho que sera usado normalmente, ja que n3o e incornum ocorrerem 
diferengas ate em aparelhos identicos ou de uma nesma marca. 


m IMPLEMENTO UTIL PARA GRAVAgOES E CARREGAMENTOS DE FITAS K-7 

Vimos antes que, para transmitir um programa do microcomputador 
para uma fita K-7, isto 4, gravar em fita um program que esteja na 
iremoria do ccmputador - atrav4s de-SAVE - 4 preciso conectar as res¬ 
pect ivas tomadas MIC de arrbos ccm cabo coaxial provido de plugues nas 
extremidades, o mesmo acontecendo quando se quer carregar no microcom 
putador isn programa previamente gravado em fita K-7 - atraves de LOAD 
- sendo a conexao feita, neste caso, pelas respectivas tomadas EAR 
de cada aparelho, com auxilio do mesmo cabo coaxial, 

0 uso permanente de dois cabos ligando as quatro temadas nSo se 
recomenda on vista da grande probabilidade de ocorrencia de realimen- 
tagSo dos sinais acusticos, com consequente prejuizo no processamento 
de gravagSo ou carregamento. 

Desconectar e conectar altemativamente os cabos, ou trabalhar 
com um unico cabo em situagSo identica, tanbem nSo constitui procedi- 
rrento comodo, alem de aumentar as probabilidades de engano nas cone- 
x5es, principaimente em mementos em que toda a atengSo e dispensada a 
aspectos intrinsecos e mais importantes do trabalho com o ccmputador, 
devendo ser considerada, ainda, a possibilidade de a repetigSo cons- 
tante desse procedimento causar danos as temadas dos aparelhos, quando 
n2o curtos-circuitos - apenas danosos, n2o perigosos no caso - em con 
sequencia do estrago eventual do cabo conector. 

Uma solugSo que parece impor-se pela simplicidade, baixo custo 
e praticidade, 4 a adogSo do inplemento descrito a seguir, cuja reali 
zag3o e extremamente exequivel, passando a ser desempenhada pelo mes- 
tid, atraves do simples acionamento de um ou outro botclo-tecla que in- 
tegram o con junto, a tarefa de comutagSo das conexSes necessarias pa¬ 
ra LOAD e SAVE. 


Basicamente, o pequeno implemento e constituido por duas chaves 
reversoras funcionando cano interruptoras de dois cabos coaxiais pro- 
vidos de plugues nas extremidades e que fazem as conexdes EAR e MIC 
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do microcomputador e do gravador. 


0 mesmo d munido tambem de um pequeno alto-falante para monito- 
ragao da reprodugSo de fitas, o que eliraina a necessidade de desplu- 
gar-se a Canada EAR do gravador quando se quer verificar uma gravagSo 
ou localizar o sea inicio ou o sea fim numa fita. 

Un potencianetro incorporado ao con junto permite controlar o vo¬ 
lume de som de monitorag3o durante a reprodug^o da fita, sem que haja 
necessidade de alterar-se o controle de volume do gravador, que podera 
ser mantido na posig3o ideal de funcionamento para a, finalidade de car 
regamento, posigSo essa determinada pela experiencia ou com auxilio do 
monitor visual constituido pelos dois pequenos LEDS - diodos lumines- 
centes - integrantes do conjunto- 

Ao receber tensSo acima de 0,2 volts um LED passa a endtir luz - 
vermelha, verde ou amarela, dependendo do tipo adotado - atingindo seu 
ponto maximo de luminiscencia quando a tens2o atingir a 1,5 volts. 

Da maneira como s3o ligados os dois leds do implemento, quando a 
potencia de son produzido pelo gravador atinge a marca aproximada de 
1,6 volts, um dos leds produz sua luminosidade plena enquanto o outro 
canega apenas a bruxulear. Um ligeiro aumento de volume do gravador em 
relaqSo a esse ponto, quando ent2o o segundo led passa a produzir apro 
ximadamente 20% de sua luminosidade, deve ser o ponto ideal para se e- 
fetuar o carregamento de um program de uma fita K-7 para o computador, 
ja que a tens2o requerida pelo computador para essa finalidade gira em 
tomo desse valor. 

Assim, os leds funcionam como indicadores visuais durante o pro- 
cesso de carregamento ou LOAD. 

A nmtagem do implemento e bastante simples, podendo ser feita 
em qualquer caixa plastica de tamanho adequado, cuidando apenas de es- 
colher bem os locais para alojamento dos canponentes para, em seguida, 
executar os furos e cortes necessaries. 

S2o apresentados nas paginas seguintes dois esquemas do implemen 
to, um eletrico e outro figurado, com indicag<3es dos componentes utili 
zados. Acreditamos ser realmente facil, can base nos iresmos, montar es 
te utilissimo implemento, que nHo se encontra a venda no mercado. 



DIODO 



ESQUEMA FIGURADO DO IMPLEMENTO PARA GRAVACOES 
E CARREGAMENTOS DE FITA K7 

ACIMA: COMPONENTES E UGACOES 

ABA1X0: CAIXA PLASTICA COM FURACAO PARA INSTALACAO DOS MESMOS 
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FITA K-7, EXPANSAO SEN LIMT3ES PARA 0 MXCROCO^PUTADDR 
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No capitulo GRAVADOR K-7, A OUTRA METADE DO fflCROO^UIADOR en- 
fatizamos a utilidade do gravador K-7 como canplemento do microcomputa 
dor, em raz2o de o nesmo processar fitas que armazenam programas de mi 
crocomputagao. 

Esse armazenamsnto constitui em realidade uma verdadeira 'tenori 
zagSo" de programas, n2o bavendo nenhuma res trig So quanto ao tipo dos 
TTEsmos ou seu conteudo: utilitarios, arquivos de dados, aplicativos ou 
de entretenimento, em linguagem Basic ou de maquina etc* 

i 

Assim, constituem as fitas K-7 verdadeira expansSo sem limites 
para o computador , raz£o por que devem nerecer atengao e cuidados ade- 
quados, entre os quais destacamos: 

- n2o deixa-las iruito prdximas do aparelho de TV, ou de alto-fa- 
lantes de grande potencia, ou de outros aparelhos eletricos que geram 
campos magneticos de intensidade suficiente para inutilizar gravagOes 
feitas nas iresmas; 

- nSo deixa-las expostas ao calor e luz fortes; 

- n3o tocar a fita propriamente dita com os dedos, em razSo de a 
oleosidade natural dos mssros The causar danos; 

- rrante-las sempre rebobinadas com a parte transparente da mesma 
- chamada fita lider - no inicio, ao melhor abrigo possivel do po e da 
umidade e, de preferencia, can o cartucho em p£, isto e, em posiciona- 
mento vertical. 


FITAS MATS 1NDICADAS 


De forma geral, qualquer fita de boa procedencia se presta para 
armazenamento de programas de computag3o. 
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Ha algumas marcas, todavia, que se recomendam mais, pelo contro- 
le rigoroso com que s3o mantidas suas caracteristicas e qualidades, po 
dendo-se destacar entre elas BASF e SCOTCH* 

As fitas conuns de 6xido de ferro, de baixo ruido, servem perfei 
tamente para a finaiidade, nSo havendo necessidade de se adotar as de 
custo mais elevado como as de cramo, ferro-crono ou metal, mesmo por- 
que os gravadores comuns K-7 que s3o utilizados em canputagSo n2o s3o 
nunidos de recursos tecnicos capazes de tirar das mesmas os proveitos 
que suas caracteristicas oferecem* 

Apenas na modalidade de processamento HIGH-SPEED e com urn grava- 
dor eventualmente mais apropriado, se recanendaria o uso de- fita deten 
tora de caracteristicas melhores de nivel de ruido e de gravag2o de me 
dias e altas frequencias. 

Atualmente s3o disponiveis no mere ado fitas SCCTCH com duragSo 
de 20 minutos, produzidas especialmente para computag3o* S2o anuncia- 
das como previamente testadas para evitar o que se chama de "dropout", 
defeito de gravag2o que inutiliza um programs e que e causado por fa- 
Iha existente na fita propriamente ou em sua pigpentagao. 

Can relagSo a tempo de duragSo de processamento, as fitas de me¬ 
lhor praticabilidade s3o as de 20 e 46 minutos, para gravagQes duplas 
de um ou dois programas de cada lado. 

Quando razOes economicas ou de espago justificam a utilizagSo de 
fitas mais longas, recomenda-se que n3o sejam utilizadas as de duragSo 
superior a 60 minutos, por duas razOes principais: 

- as dificuldades para localizagSo dos programas gravados se tor 
nam maiores e por vezes extremamente cansativas, especialmente quando 
o gravador utilizado n3o dispSe de conta-giros ou n2o foram feitas ano 
tag<5es adequadas no cartucho; 

- as probabilidades de surgirem problems no arrasto da fita du¬ 
rante gravagOes e reprodugOes e em rebobinamentos para a frente e para 
tras aumentam, principalmente quando o rolo pressor de borracha e ou- 
tras partes do mecanismo do gravador para movimentagao da fita comegam 
a apresentar algum desgaste ou folgas excedentes 2s especificagSes. 


Algumas recomendagges para que a manipulagao e processarrento de 
uma fita com varios programas n3o apresente dificuldades: 

- usar fitas cujo cartucho plastico seja da melhor transparencia 
e tenha uma escala bem nitida de visualizag5o do ponto de bobinamento. 
Caso a escala nSo seja muito nitida, aconselha-se colar no local um 
pequena tira de etiqueta adesiva clara, com mrcagOes apropriadas e ni 
tidas, feitas previamente. Evidentemente, se o gravador utilizado dis- 
puser de conta-giros de fita e forem anotados os pontos iniciais de ca 
da gravagSo feita na fita, a presente reconendagSo n3o e valida. N3o 
ha duvida, todavia, que a grande maioria dos aparelhos existentes atu¬ 
almente em nosso mercado n3o conta com esse recurso; 

- n3o ter mais do que dois programas loogos ou tres medios - gra 
vados duplamente e em sequencia - em cada lado da fita; 

- procurar agrupar numa mesma fita programas de frequencia de u- 
so proxima, a fim de que o estiramento e rebobinamento da fita se pro- 
cesse por igual; 

- iniciar a gravagSo de cada program sempre numa das marcas da 
escala de visualizag3o do ponto de bobinamento da fita, de nianeira que 
sejam facilitadas as anotagSes na tampa ou no cartucho da fita e a pr6 
pria localizagSo do programa quando for efetuar seu carregamento para 
o canputador; 

- manter os cabegotes e o mecanismo do gravador em condigSes sem 
pre adequadas para o seu melhor desetnpenho, a fim de que a qualidade 
de gravagelo e reprodug3o de fitas seja otimizada. 
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ORGANIZACSO DA MEM3RIA DO IK 85 £ AS VARIAVEIS DO SISTEMA 

Para que funcione dentro dos paramtros inteligentemente estabe- 
lecidos, prestando os excelentes servigos que nos presta, o microcompu 
tador ton sua estrutura "intelectual" dividida em duas memorias: mf, 
em ingles ’'read only memory”, e RAM, em ingles ’’random access memory"* 
Anbas fazem parte do tnicroprocessador 2IL0G Z 80, constituido de 65535 
"bytes"* Byte e uma unidade de 8 bits (bit ~ unidade binaria)* Os "by¬ 
tes" armazenam eletronicamente codigos ou numeros binarios, que indi¬ 
cam ao microprocessador, atraves de seus rnilhares de circuitos eletro- 
nicos integrados, quais as agSes, fungSes ou operagDes que devem ser 
desempenhadas ou executadas, a fim de que a computagSo propriamente di 
ta se realize* Os "bytes" tambem s£o referidos conr> "enderegos", num- 
rados de 0 a 65535* 

A RCM, cano diz o name ingles, so pode ser lida, o que quer di- 
zer que podemos conhec§-la, saber o que contem, estudar o seu funciona 
mento e utiliza-la, mas e permanente e imutavel, Desperta e dorme coin 
o ccmputador, sempre do mesmo jeito, quando este e ligado e desligado. 
Nela estao contidas todas as rotinas e procedimentos de funcionanento, 
fomecxmento de dados para o monitor de video e para a inpressora e o 
programs chamado interpretador, que traduz as instrugOes da linguagem 
BASIC de forma que cada uma acione com precisao a rotina especifica 
de cada fung3o requerida* No IK 85 a RCM ocupa os enderegos de memdria 
de 0 a 10240* 

A RAM, cans tambem diz o name em ingles, e a parte da nemoria k 
qual temos aces so, isto e, e o local onde colocamos e manipulamos nos- 
sos programs, quer em linguagem BASIC ou de maquina, e onde s3o colo- 
cadas as chamdas "variaveis do sistema", cujas fungOes nos interessam 
mais de per to e que logo examinarenos* 

A RAM ocupa a area de memdria dos enderegos 16384 a 65535* E sub 
dividida em diversas areas, cada qual com uma finalidade especificada? 
Os enderegos dos limites iniciais dessas areas s3o controlados pelas 
variaveis do sistema, que fomecem informagOes precisas de sua locali- 


zagSo ao longo de toda a RAM, o que e de muita importancia em razSo de 
que algumas dessas areas s3o elasticas, isto e, aumentam ou diminuem 
em fungSo da quantidade de dados que contem a cada memento, ernpurrando 
ou puxando as outras concomitantemente, o que faz com que os enderegos 
ocupados pelas nesmas mudem instantemente. Aprender a conhecer e saber 
como localizar esses enderegos e manipula-los, em alguns casos alteran 
do os codigos de instrugdes que contem, e de grande valia para dominar 
melhor o microcomputador. 

Apresentarros a seguir um esquema figurado da RAM, extraido do ma 
nual do usuario do aparelho* 0 mesmo mostra as diversas areas menciona 
das, bem como sua localizagSo relativa e o ncme das variaveis do siste 
ma que controiam e registram os enderegos iniciais de cada um* 


Variaveis 

Program 

Arquivo de 
imagem 

Variaveis 


SfgSfalfS 0 

espaep/ae 

trabalho 

J 

f 16384 J 

\ 16509 

\ ECTLE 1 

| VARS J 

| ELBE | 

PILFUN 

t Stack do _ 

=* , „ , Reserva 

^ calculador 

Stack da 
maquina 

Stack Rotinas 

GOSUB USR 


f PILFUN f PTT.FTM ^ lo^stlcfc f ENSP f RIP 

ESQUEMA FIGURADO DA RAM 


0 estudo conpleto e minucioso das variaveis do sisterre e do pro- 
prio sistema constitui capitulo a parte e foge do escopo deste traba- 
Iho* Deve ser feito con base no manual de especificagSes e uso do apa¬ 
relho e em obras especializadas, a partir do memento em que o usuario 
se sinta habilitado e decida explorar ao maximo toda a potencialidade 
de seu microcomputador. 

Examinaremos aqui apenas algumas dessas variaveis do sistema, as 
quais n3o devem ser confundidas com as variaveis comuns nunericas e al 
fanurrericas utilizadas nos programs vistos anteriormente * Examinare- 
mos apenas as de utilizagSo praticamente obrigatoria mesmo por princi- 
piantes, com o fito de dar uma ideia de seu desempenho e de como podem 
ser manipuladas, isto e, "instruldas" e usadas para certas finalidades. 
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Todas as variaveis do sistema ocupam enderego permanente na RAM 
e. dependendo de sua fungSo, ocupam um ou dois enderegos ou "bytes" no 
computador. 

Vejamos as seguintes: 


VARIAVEL 

ENDEREQO(S) 

KEP 

16388-16389 

LPC 

16394-16395 

DFILE 

16396-16397 

VARS 

16400-16401 

ELINE 

16404-16405 

DFSZ 

16418 

PXLN 

16425-16426 


FUNCAO 

Indica o enderego inicial da area de memo 
ria n3o utilizavel no computador. 

Indica o numero da ultima linha de um pro 
grama que esteve em processamento. 

Indica o comego da area de arquivo dos co 
digos para imagem de IV. 

Indica o comego da area de variaveis para 
programagao normal. 

Controls espagos para linha em digitagSo. 

Reserva duas linhas no extreme inferior 
do video para edigSo ou digitagSo. 

Indica o numero do primeiro enderego li- 
vre depois de um programa. 


13ote no esquema figurado da RAM que a area de programs comega 
AO enderego ou ,r byte" 16509. 

0 comando PRINT PEEK 16396+256*HEEK 16397-16509 verifica em que 
enderego se encontra o marco divisorio da variavel DFILE, que e a pri- 
neira depois da area de programs, e subtrai do numero achado o do en¬ 
derego de inicio da area, 16509, sendo a diferenga a quantidade de IT by 
tes" em uso na area de programas. 

Assim, para se saber a quantidade de T 'bytes” de qualquer progra- 
ira, basta valer-se desse recurso. E quase uma constante a necessidade 
de ter-se essa infoimagSo, para diversas finalidades. 

Digite agora o comando como linha de programa, acrescentando-o a 
linha 10 ja existente: 

20 PRINT PEEK 16396+256*PEEK 16397-16509 

Tecle RUN e NEW LINE. Observe que, al&n da palavra CANECA, agora 
o nunero que aparece no video e 67, correpondendo a 14 1 bytes" da li¬ 
nha 10 mais 53 ''bytes" da linha 20, que foi incluida cano linha de pro 
grama e que, portanto, ocupa espago na manoria RAM. 

Caso seja -necessario verificar apenas o enderego em que se encon 
tra o inicio da area, basta digitar o comando sem indicar a subtragSo 
do enderego 16509: PRINT PEEK 16396+256*PEEK 16397. 

Tecle NEW e NEW LINE. 


Comecemos por DFILE: 

Digite:. PRINT PEEK 16396+256-PEEK 16397-16509 

Tecle NEW LINE. Observe o numero .que aparece no canto superior 
esquerdo do video. Deve ser 0. 

Digite: 10 PRINT ,T CANECA ,r - Repita o comando feito antes. 

Tecle NEW LINE. Observe que o numero que aparece no video agora 
e 14. E a quantidade de 1 Tbytes rT que a linha de programa 10 PRINT T, CANE 
CA" ocupa na area de programas na RAM. 


Vejamos agora a variavel VARS: 

Digite: PRINT PEEK 1640O+256*PEEK 16401-16509 

Tecle NEW LINE. Observe que aparece agora no video o numero 793, 
enibora n3o haja nenhum programa no computador. 

Observando o esquema da RAM, notamos que a variavel VARS contro¬ 
ls o limite inicial da area de variaveis de programas - n3o confundir 
com as variaveis do sistema - marcando portanto o fim da area de arqui 
vo de imagem, is to e, o local onde o microcomputador coloca os codigos 
de um programa existente na RAM, referentes a unagens de video que de- 
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vem ser geradas do mesmo. E esta area ocupa permanentemente 793 endere 
90 s ou 1 bytes’' da RAM, no caso do IK 85, diferindo do TK 82 C ou IK 8 l 

Todo programa introduzido no computador tem seus codigos automa- 
ticamente copiados e registrados nessa area, de acordo com as etapas 
do programa, a fim de que sejam geradas as imagens de cada uma na se- 
quencia natural. 

Digite: 10 PRINT ’’CANECA” 

Tecle NEW LINE. 

Digite: PRINT PEEK 16400+256*PEEK 16401-16509 

Tecle NEW LINE. Observe o numero que aparece agora no video: 807, 
correspondendo a 14 'bytes” da area de programas e 793 da area de ar- 
quivo de imagens. 

Se for introduzido urn programa que ocupe 5000 ’bytes”, por exem- 
plo, o numero a ser apresentado sera 5793 . 

Tecle NEW e NEW LINE. 

A variavel ELINE: 

Ela registra sempre o enderego inicial da area reservada na RAM 
para a linha de programa que esta sendo digitada e que n 3 o passou ain- 
da para a area de programas. Seu marco divisorio esta logo apos a area 
de variaveis de programas. Assim. podemos tanibem utiliza-la para saber 
a quantidade total de 1 Tbytes ’ 1 ocupados na RAM por programas que utili- 
zam variaveis, o que e irnito importante quando s 3 o usadas variaveis ex 
tensamente dimensionadas como DIM A$(200,20), DIM A(200), DIM B(200) e 
outras, por exemplo. 

Digite: PRINT PEEK 16404+256*PEEK 16405-16509 

Tecle NEl<r LIRE. Observe o numero que aparece no video: 794, sen¬ 
do 793 da area de arquivo de imagens e 1 de fronteira. 

Digite agora: DIM A$(200) 


Tecle NEW LINE. 

Digite de novo: PRINT PEEK 16404+256*PEEK 16405-16509 

Tecle NEy LINE. Observe agora o numero correspondente a quantida 
de de ’bytes” utilizados pelo dimensionamento da variavel A$, somados 
aos ’bytes” da area de arquivo de imagens. 

Antes de prosseguirmos, vamos entender melhor o canando ja utili 
zado diversas vezes nas verificagSes feitas: PRINT PEEK. 

PRINT PEEK 16396 signifies: imprima (ou escreva) no video o con- 
teudo ou codigo do enderego 16396. 

PEEK 16397 signifies: conteudo ou codigo do enderego 16397. 

PRINT PEEK 16396+256*FEEK 16397 signifies: imprima o resultado 
da adigSo do codigo constants no enderego 16396 com o codigo que cons- 
ta no enderego 16397 nultiplicado por 256. 

Supondo que no momento da verificagSo os numeros dos codigos se¬ 
jam: 139 no enderego 16396 e 64 no enderego 16397, o comando exemplifi 
cado por ultimo corresponde a 139+(256*64) ou a 16523, que e o endere- 
.co onde se encontra o marco da variavel DFILE se no momento houver no 
computador uma linha de programa 10 PRINT ”CANECA M . 

Sabeoos que cada ’byte” e uma unidade de 8 bits que armazena um 
codigo ou um numero binario. A capacidade maxima de um ’byte” e amaze 
nar codificagSo binaria correspondente ao numero decimal 255. Vimos 
tanibem que o microprocessador utilizado no microcanputador disp5e de 
65535 ’bytes”, eiribora essa quantidade seja usada socrente nos aparelhos 
de rremoria RAM expandida para 48 K ’’bytes”. Por essa raz3o, a manipula 
g 3 o dos nurreros dos enderegos ou dos ’bytes” e feita necessaria e ine 
vitavelmente por dois ’bytes”, utilizando-se o primeiro para a parcels 
menos significative do numero (a de manor peso ponderado) e o segundo 
para a parcel a mais significativa. 

Essa peculiaridade podera ser melhor canpreendida can 0 exame da 
proxima variavel do sistema: 

A variavel RTP, quase sempre refer ida caro RAMTOP. 
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El a registra o inicio da area n3o utilizdvel na RAM, a area de 
de topo, mas pode ser manipulada para desempenhar outra fung3o. 

Digite: PRINT PEEK 16388+256*P£EK 16389 

Tecle NEW LINE* Observe o numero 32768 que aparece no video* E o 
enderego do inicio da area referida, se o computador tiver 16 K de me- 
iroria RAM. 

Como vimos no esquema, a RAM ccxrega no enderego 16384. Lenbrerros 
que um K ,r byte M corresponde a 1024 ff bytes ,r . Portanto, 32768 (= 16384 + 
16384) e o enderego do primeiro ,r byte n n3o utilizavel do sis terra. 

Digite: PRINT PEEK 16388 

Tecle NEW LINE e anote o conteudo do enderego 16388, que devera 
estar impresso no video. Deve ser 0. 

Digite: PRINT PEEK 16389 

Tecle NEW LINE. Anote tanbem o conteudo do enderego 16389* Deve 
ser 128. 

De acordo com o que vimos pouco antes sobre a manipulacSo dos nu 
meros dos enderegos por dois Tt bytes", terras: 0 (do 12 ,r byte n ) + (256* 
128) (do 22 ft byte") ® 32768. 

A variavel RIP pode ser manipulada para baixar seu marco divisd 
rio, por exemplo para o enderego 32000, a fim de que sejam colocados 
acima desse enderego programas ou rotinas que fiquem a salvo dos cotran 
dos NEW e CLEAR, o que pode ser um recurso nuito valioso em certas cir 
cunstancias. Deve ser levado em conta, todavia, o fato de que tartibem 
os comandos SAVE e LOAD n3o tem efeito sobre essa area. 

Suponha-se que se queira- rodar varios programas que utilizam um 
roe smo arquivo ou con junto de dados. Coloca-se o mesmo nessa area, is to 
e, entre os enderegos 32000 e 32768, em linguagem de maquina, carrega- 
se o programs que vai utilizar esses dados, o carregamento sendo feito 
normalmente atraves de LOAD ou de digitagSo, e faz-se a introdugSo dos 
dados do arquivo, atraves de chamada apropriada do mesmo pelo comando 
USR, grava-se esse programs em fita K-7, procede-se a um NEW, sem afe- 


tar o arquivo na area reservada, carrega-se novo programa para proces- 
sanento, e assim sucessivamente. 

OCM) BAIXAR A RTF. Para o enderego 32000, por exemplo: 

Digite: POKE 16388,0 e tecle NEW LINE 

Digite: POKE 16389,125 e tecle NEW LINE 

Tecle NEW e NEW LINE. 

Verifique agora onde se encontra o marco divisorio da RIP: 

Digite: PRINT PEEK 16388+256*PEEK 16389 

Tecle NEW LINE e note que sera exibido no video o numero 32000, 
que & o enderego onde se encontra agora o marco da RIP. 

A titulo de exercicio, baixe a RIP para 29500, lenibrando que di- 
vidindo-se 29500 por 256 teremos um quociente de 115 com resto 60, e- 
quivalendo a 60+(115*256). Se tiver duvidas sobre a convers3o, leia o 
capltulo SISTEMAS DE NUMERAQSO E 0 CrMPUTADQR, que segue ao presente. 

A variavel DPSZ: 

Ela controls o numero de linhas na parte inferior da tela de TV, 
reservando sempre e autanaticamente duas linhas ali, para digitag3o ou 
edigSo de comandos ou instrugSes. 

Digite: PRINT PEEK 16418 

Tecle NEW LINE* Note que o numero 2 que aparece no video e o seu 
conteudo e se refere as duas linhas mencionadas* Esse numero pode ser 
manipulado. 

Digite: 10 POR 0=0 TO 23 

20 PRINT tf LINHA NUMERO M ;C 
30 NEXT C 

Tecle RUN e NEW LINE. Note que, depois de rodado, o programa pa¬ 
ra na linha 21 can a notagSo 5/20, indicando falta de espago para pros 
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seguir. Manipule ent2o a variavel DFSZ: 

Digite: 5 POKE 16418,0 

Tecle NEW LINE, RUN e NEW LINE, Note que o programs foi executa- 
do integralmente agora, em consequencia da introdugSo da linha 5, que 
nuda o conteudo da variavel de 2 para 0, anulando assim a reserva fei- 
ta pela mesma. Manipule novamente a variavel: 

Digite: 5 POKE 16418,10 

Tecle NEW LINE, RUN e NEW LINE* Note que agora o program foi e- 
xecutado sonente ate a linha 13* 

A necessidade de obter as. 24 linhas de video, ou apenas 3, 5, 10 
etc., varia em fungSo do tipo de programs e da imginag2o de quem o e- 
labora, mas n2o ha duvida, todavia, que a manipulagSo da variavel DFSZ 
pode ser muito util, especialmente para elaboragSo de jogos e graficos* 

A variavel LFC: 

Ela registra a ultima linha que esteve em digitagSto ou alterag2o 
e na qual permanece o cursor de edigSo do programs. 

Sua utilizag2o pode ser pratica quando fazemos alguma alteragSo 
num programs muito longo e esquecemos o numero da linha alterada, sen- 
do necessario novo aces so & mesma para retificagSo ou nova alteragSo, 
cano exemplo. Em vez de percorrermos o program todo, fazendo diversos 
comandos LIST, voltando atras etc., podenos fazer apenas o comando da 
fung2o da variavel. 

Verifique num program existente na memoria do computador qual a 
ultima linha que foi trabalhada: 

Digite: PRINT PEEK 16394+256*FEEK 16395 

Tecle NEW LINE e em seguida confirme a informagao obtida. 

A variavel PXLN: 

Ela registra o primeiro ,r byte" ou enderego livre apds urn progra- 


existente na RAM. A indicagao desse enderego pode ter muita utili- 
dade em varias circunstancias de uso do computador, sendo a mais sim¬ 
ples delas quando se quer conhecer o espago livre remanescente na RAM 
durante a digitagao de um program longo ou apos o carregamento de um 
nessa condigao. Para obter essa indicagSo: 

Digite: PRINT PEEK 16425+256*PEEK 16426 

Tecle NEW LINE. 0 nurrero fomecido sera o do ultimo enderego o- 
cupado pelo programs existente na RAM, acrescido de 1, que e o pri¬ 
meiro TT byte n livre apos o mesmo. 

Comparando-se o numero fomecido com o da RTP - 32768 - sabere- 
nos de imediato os '’bytes" ainda disponiveis, no caso de um aparelho 
de 16 K bytes'*. 

Se essa verificag5o tiver que ser feita con frequencia durante 
a digitagSo de um program longo, o ccxnando da mesma podera ser feito 
ou colocado numa linha distante do program, 9990 por exemplo, e to- 
da vez que se queira aquela informagSo, bastara utilizar o conando 
GOTO 9990 e teclar NEW LINE, sem prejuizo para o programa em digita- 
g2o ou verificag2o e estudo. 

A variavel PXLN podera tarnbem indicar diretarrente a quantidade 
de Tt bytes" disponiveis, adotando-se o seguinte comando ou instrugSo: 

PRINT 32768-(PEEK 16425+256*FEEK 16426) 

Ao fazer-se tal comando sem que haja linhas de program ou di- 
mens ionamentos de variaveis no computador, esperar-se-a obter no vi¬ 
deo o numero 16384 corn resposta, equivalente a 16 K "bytes" da RAM, 
ja que 1 K ,r byte" e = 1024 "bytes". Mas, efetivamente, o computador 
fomecera o numero 16259, por tan to 125 T bytes" a menos, em virtudede 
os mesmos serem ocupados permnentemente pelas variaveis do sistem. 

Assim, para efeito de saber realmente qual a disponibilidade de 
'bytes' 1 na RAM, para utilizagSo em programs, devem ser descontados : 
125 "bytes" ocupados pelas variaveis do sistem, mis 793 do arquivo 
de imgem de TV e mis 100, aproximadamente, ocupados.pelos chamados 
"stacks” existentes na RAM, restando em verdade cerca de 15350 ende- 
regos ou 'bytes' 1 . 
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Examinamos apenas algumas das variaveis existentes no sistema, e 
o fizemos mais can o fito de dar uma ideia do que sao, como funcionam 
e como podem ser manipuladas. Mas, como dissoios no inicio deste capi- 
tulo, o estudo completo e profundo das mesmas foge a finalidade deste 
humilde trabalho. 

Entre as diversas outras variaveis do sistema, ha mais algumas 
de irutita utilidade pratica e outras que vaiem ser conhecidas no minima 
por suas curiosas e peculiares funqSes, sobretudo para o usuario inte- 
ressado on tirar o maxima rendimento de seu microcomputador a medida 
era que vai se aperfeifoando em programs£<3es mais avangadas. 

Recomendamos urn exame de todas as variaveis do sistema no manual 
de proprietario do aparelho. Seu amplo conhecimento e dcminio, entre- 
tanto, e como ja afirmanos, depende de estudo minucioso, feito & parte 
do presente, e com auxilio de literatura especifica. 


SISTEMAS DE NUMERAgSO E 0 QOMFUTADOR 


Qualquer usuario de coraputador - micro, mini ou macro - inevita- 
velmante se defrontara com problemas relacionados a sistemas de numera 
9 S 0 , quer seja para estudo, contpreens2o e manipulagSo do proprio canpu 
tador, quer seja para conversSes necessarias em programagOes, de forma 
que e sempre util ter as mSos dados e tabelas que facilitem a rememori 
zag^o deste assunto, por vezes intrincado. 

M3MERACA0 DE BASE 10 OU DECIMAL: Utiliza 10 sinbolos: 0, 1,2, 3, 4, 5, 

6 , 7 , 8 e 9. 


Sabemos que um algarismo tem tanto mais valor ou peso quanto mais 
a esquerda estiver nuna escala de posigOes de um numero. Assim, o name- 
ro 1000 vale 1000 vezes 0001 no sistema decimal porque os valores das 
posigSes aumentam em potencias de 10 para cada casa esquerda na escala, 
Exenplo: 


NDMERO 
POSigAO 
PESO/VALOR 
VALOR RELATTV0 


0 numero 


N 

4 

* 

10 ' 


N 

3 

10 ' 


N 

2 

10 


N 

1 

10 ' 


0 


NxlOOO + NxlOO + NxlO + Nxl 


Assim, o numero 1 


0 


0 


0 


porque (Ixl 000 )+( 0 xl 00 ) +( 0 x 10 ) + ( 0 x 1 ) 


porque (3xlOOO)+(2xlOO) +(4x10) + (7x1) 


MJMERAC&O de BASE 2 00 BINARIA: Utiliza 2 simbolos: 0 e 1. 


vale 1000 
= 1000 
vale 3247 
= 3247 


Tem seus valores aumantados em potencias de 2 para cada casa CO' 
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rio vale 8 vezes 0001. Exemplo 


NOMERD N N N N 

POSI5& 4 3 2 1 

PESO/VALOR T 2 2 2 5 2° 

VALOR RELATIVO Nx8 + Nx4 + Nx2 + Nxl 

Assim, o numero 1 0 0 0 vale 8 

porque 0x8) + (0x4) + (0x2) + (0x1) = 8 

0 numero 1111 vale 15 

porque 0x8) + (1x4) + (1x2) + 0x1) - 15 

M3M5RACR) DE BASE 16 0U HEXADECIMAL: Utiliza 16 sirrbolos: 0, 1, 2, 3, 

4, 5, 6, 7, 8, 9, A, B, C, D, E, 
F. A e equivalente a 10 em decimal, B = 11, C = 12, D = 13, E = 14, F 
= 15. 


0s numeros hexadecimais tern seus valores ou pesos auroentados em 
potencias de 16 para cada casa colocada a esquerda na escala de posi- 
goes dos digitos. Assim, 1000 em hexadecimal vale 4096 vezes 0001. E- 
xemplo: 


NOMERO 

posigSo 

PESO/VALOR 
VALOR RELAJTVO 


N N N 

4 3 2 

3 2 1 

16 J 16 16 


N 

1 


Nx4096 + Nx256 + Nxl6 + Nxl 


Assim, o numero 10 0 0 vale 4096 

porque (1x4096)+(0x256) +(0x16) + (0x1) = 4096 

0 nurrero 3 16 5 vale 12465 


porque (3x4Q96)+( 1x256) + (6x16) + (5x1) = 12645 
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rtUMERAffiO DE BASE 256, SISTEMA ORA PROPOSTO: Utiliza 256 s&ibolos, com 

preendendo os numeros he 
xadecimais de 00 (=0) a FF, ou os decimals, de 0 a 255. Sua potencia 
cSo e de 256 para cada posig5o a esquerda na escala de posigSes dos nu 


meros 


Sua representag5o e feita sempre entre aspas e com valores a tri¬ 
butes a cada simbolo, separado um do outro por parenteses. Entre os 

^ i _«___ i 


em computaqao), ou a letra D quando os valores s3o representados pelos 
numeros decimais. Exemptificando: 


NOMERD 

FOSigSD 

PESO/VALOR 


" N 


(H) 

“(D) 


N " 


VALOR RELATIVO 


Kx256 


Assim, o nurrero " 10 (H) 00 rt . vale 4096 

porque (16x256) + (0x1) ~ 4096 

0 numero 11 FF (H) FF 11 . vale 65535 


porque (255x256) + (255x1) . - 65535 

0 numero ,r 117 (D) 48 n .• •••• vale 30000 


porque (117x256) + (48x1) . - 30000 

Os computadores classificados como de 8 bits (= 1 ,r byte ,f ) s3o 
manipulados atraves de numeros que variam de 0 a cifras iniito elevadas 
Os que adotam o microprocessador Z 80 da Zilog, caso do TK e outros da 
linha Sinclair, s3o dotados de 65535 Tl bytes 11 ou enderegos, rnuitos dos 
quais tem que ser manipulados con certa frequencia* 

Mas, como sabemos, 8 bits so podem canter e representar nume¬ 
ros equivalentes a 0 a 255, num total de 256, de forma que os computa- 
dores dessa categoria utilizam 2 "bytes' 1 (cada um can 8 bits ) para pro 
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cessamento de numeros de 0 a 65535. 

Os dois 1 'bytes" s3o usados pelo computador, nessa fung3o, como 
numeros numa escala de posig5es: o primeiro ,f byte Tf (o de enderego mais 
baixo) na primeira posigSo, o segundo "byte" (o de enderego mais alto) 
na posig2o equivalente a esquerda do primeiro, de forma que o primeiro 
e de potencia 0 e o segundo de potencia 1. Se fossem usados 3 ,T bytes" 
para essa fungSo, para numeros superiores a 65535, o terceiro tl byte n o 
cuparia, figuradamente, o 32 lugar a esquerda na escala de posigSes e 
seria potenciado ao quadrado, isto e, potencia de indice 2, em analo- 
gia can os demais sis terns de nurreragSo. 

Para conputadores ate a capacidade mencionada, duas posig<5es ape 
nas s3o suficientes, por cobrirem toda a gama de numeros de 0 a 655357 

Seguindo as norrras vigentes e supondo que tenhamos que nudar a 
KTP - como foi visto no capitulo ORGANIZAgSO DA KE>K)RIA DO IK 85 E AS 
VARIAVEIS DO SISTEMA - para o enderego 32150, vamos encontrar a seguin 
te indicagSo: "RAIXAR A KIP PARA 32150". Temos ent&o que converter es¬ 
se numero e anotar os resultados para, on seguida, fazer os comandos 
necessarios. 

Se a notagSo ou instrugSo para o mesno fim for feita segundo pro 
posto agora, tereros a indicagSo feita na seguinte forma: BAIXAR A RIP 
PARA "125(D) ISO 11 . De acordo com o expos to mais acirna, fazemos os coman 
dos diretos seguintes: 

POKE 16388,150 e NEWLINE 

POKE 16389,125 e NEW LINE 

NEW e NEW LINE 

Se quisermos saber a que enderego corresponde a notagSo basta e- 
fetuarrros: 256x125 (do 22 ft byte ff ) + 150 (do 19 "byte"), ou, coud ja te 
rros visto: 150 + (256x125), resultando 32150. 

Quando for conveniente fazer as notagSes em numeros hexadecimais 
num programs em linguagem de maquina, por exemplo, basta substituirmos 
os valores decimais pelos seus correspondentes hexadecimais, com auxi- 
lio da tabela de equivalencia HEXA-DECI, introduzida logo apos o pre¬ 


sente capitulo, com a conveniencia de n3o se ter que se preocupar com 
calculos para esse fim. 

A convers3o de urn numero decimal para urn de base 256 faz-se com 
urns simples operagSo aritmetica de divisSo. Sej& o numero 16509, como 
exemplo: 

16509 dividido por 256 - 64, com res to 125. 

Logo, "64(D) 125 tf e o equivalente NOMERO DE BASE 256. 

Seja o numero 31450, como outro exemplo: 

31450 dividido por 256 “ 122, can resto 218. 

Logo, "122(D)218 n e o equivalente NOMERO DE BASE 256. 

As vantagens. desse sis tana, numa analise mais imediata: 

- notagDes diretas e concisas; 

- maior facilidade na introdugSo de dados correlatos no computa- 
dor, ja que sua interpretagSo e direta e imediata; 

- maior rapidez nas conversSes necessarias. 

Eirbora nSo aparente a primeira vista sua grande utilidade, a mas 
ma sera facilmente percebida pelo usuario de canputador t9o logo a ne- 
cessidade de nanipulagSo de 1 'bytes" ou enderegos se manifeste. 
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TABELA DOS SIMBOLOS DOS SISTEMAS DE NUMERAgS) E EQUIVALENCIAS 


(Os sublinhados constituem os simbolos de cada sistema.) 


IECIMAL: 


HEXADECIMAL: 


BEMRIO: 



Em canputagSo e generalizado o uso dos digitos hexadecimais em 
grupos de dois, separados ou agrupados. Por exemplo: 00 , 09, C5, A7, 
B306 etc., para facilidade de leitura e ccmpreensSo, o nesmo acontecen 
do com os numeros binarios, que s3o agrupados em quatro digitos. Por 
exernlo: 0001, 0010 0111 etc. A ordem crescente e da direita para a es- 
querda, em anibos os casos. 


tatota HEXA-DECI - CCMBINAC0ES DOS SIMBOLOS HEXADECIMAIS 
E SEUS EQOIVALENIES DECIMAIS 

0123456789ABCDEF 


0 
1 

2 

3 

4 

5 

6 

7 

8 
9 
A 
B 
C 
D 
E 
F 

Os 16 simbolos hexadecimais encontram-se na primeira linha supe¬ 
rior e na primaira coluna & esquerda, anibos fora do quadro. Dentro do 
quadro encontram-se os numeros decimals de 0 a 235, que correspondent, 
an equivalencia, as combinaqSes possiveis dos sinfcolos hexadecimais. 

As conibinaqQes s2o obtidas atraves do encontro das linhas com as 
colunas em que se encontram os sinibolos. 0 panto de encontro das mes- 
mas, dentro do quadro, da o numero decimal equivalente. Exemplos: 

Para se determinar o equivalente decimal do n2 hexadecimal B7, 
procura-se na 12 coluna h. esquerda, fora do quadro, a letra B e percor 
re-se sua linha ate a coluna em que se encontra o n9 7, na 1§ linha fo 
ra do quadro. No ponto de encontro das mesmas encontra-se o nunero de¬ 
cimal equivalente, no caso o n2 183. 

Para se determinar o equivalente hexadecimal do n2 decimal 166, 
procura-se este no quadro dos numeros decimals e determina-se a linha 
em que se encontra o mesmo em relaqSo a 12 coluna A esquerda, fora do 
quadro, achando-se A. Em seguida, determina-se a coluna em que se en¬ 
contra o mesmo em relaqSo a 12 linha superior, fora do quadro, achan¬ 
do-se o simbolo 6. 0 n2 hexadecimal sera A6, equivalente a 166 decimal. 


0 

1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 

21 

22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 

61 

62 

63 

64 

65 

66 

67 

68 

69 

70 

71 

72 

73 

74 

75 

76 

77 

78 

79 

80 

81 

82 

83 

84 

85 

86 

87 

88 

89 

90 

91 

92 

93 

94 

95 

96 

97 

98 

99 

100 

101 

102 

103 

104 

105 

106 

107 

108 

109 

110 

111 

112 

113 

114 

115 

116 

117 

118 

119 

120 

121 

122 

123 

124 

125 

126 

127 

128 

129 

130 

131 

132 

133 

134 

135 

136 

137 

138 

139 

140 

141 

142 

143 

144 

145 

146 

147 

148 

149 

150 

151 

152 

153 

154 

155 

156 

157 

158 

159 

160 

161 

162 

163 

164 

165 

166 

167 

168 

169 

170 

171 

172 

173 

174 

175 

176 

177 

178 

179 

180 

181 

182 

183 

184 

185 

186 

187 

188 

189 

190 

191 

192 

193 

194 

•195 

196 

197 

198 

199 

200 

201 

202 

203 

204 

205 

206 

207 

208 

209 

210 

211 

212 

213 

214 

215 

216 

217 

218 

219 

220 

221 

222 

223 

224 

225 

226 

227 

228 

229 

230 

231 

232 

233 

234 

235 

236 

237 

238 

239 

240 

241 

242 

243 

244 

245 

246 

247 

248 

249 

250 

251 

252 

253 

254 

255 


































OONVEKSap DECIMAL PARA BINARIO (BASE 10 PARA BASE 2) 


CONVERSED BINARIO PARA DECIMAL (BASE 2 PARA BASE 10) 


A converse e feita atraves de divisSes sucessivas do numero de 
cunal por 2, anotando-se os restos das divisOes, ate o quociente tor 
nar-se menor do que o divisor 2. 0 numero convertido e formado pelo 
ultimo quociente e os restos das divisSes efetuadas, lidos na orden in 
versa aquela em que foram obtidos. 


R2 DECIMAL 

N2 BINARIO 

PR0CEDIMENIO 



8 

1000 

8 : 
4 : 

2 = 4 

2 = 2 

9 9 9 

• 9 9 

com resto 0 ^ 
com resto 0 ^ 
com resto 0 



2 : 

2 = 2 

* • « 

114 

111 0010 

114 : 

2 = 57 

¥ 

9 9 ft 

com resto 0 % 
cam resto 2 j 
com resto 0 ^ 
com resto 0 ^ 
can resto 2 j 
com resto 1 ; 



57 : 

2 = 28 

• • 9 



28 : 

2 = 14 

9 9 9 



14 : 
7 : 

2 = 7 

2 = 3 

9 9 9 

9 » « 



3 : 

2 = 1 

9 9 9 

1520 

101 1111 0000 

1520 : 

2 = 760 

9 9 9 

can resto 0 ^ 
com resto 0 ^ 
com resto 0 ^ 
can resto 0 ^ 
com resto 1 ^ 
com resto 2 ^ 
com resto 2 ^ 
can resto 1 ^ 
com resto 2 ^ 
com resto 0 



760 : 

2 = 380 

9 9 9 



380 : 

2 = 190 

9 9 9 



190 : 

2 = 95 

9 9 9 



95 : 

2 = 47 

9 9 9 



47 : 

2 = 23 

9 9 9 



23 : 

2=11 

9 9 9 



11 : 
5 : 

2 = 5 

2 = 2 

9 9 9 

• 99 



2 : 

2 = 1 

9 9m 


Observaqao: Quando o numero decimal a ser convertido for imito grande, 
a conversao se toma xnais rapida se for feita primeiramen- 
te para nuraeros de base 256, em seguida convertidos para hexadecimais 
e finalmente para binaries. 


A conversao e feita nultiplicando-se os digitos binarios pelo va 
lor relativo a potenciaqUo da base 2 nas posigCes correspondentes aos 
xiEsmos na escala de pesos, sendo a soma desses produtos o numero con¬ 
vertido. 0 uso da tabela que se segue facilitara as convers5es: 


TABELA DE POIENCIAS DAS K>Sig0ES E VADOEES RELASTVOS DAS MESMAS 


POSIC® 

16 

15 

14 

13 

12 

ii 

10 

9 

8 

7 

6 

5 

_4 

_3 

2 

1 

P0IENCIA 

2 15 

2 14 

2 13 

2 12 

2 11 

2 10 

2 9 

2 8 

2 ? 

2 6 

2 5 

2 4 

2 

2 2 

2 

2 

VALOR 

RELATIVO 

32768 

16384 

8192 

§ 

O' 

e 

00 

1024 

Cn 

fo 

N> 

U1 

Fo 

00 

£ 

u> 

N? 

ON 

CO 


N? 

— 


Exemplos: 


N2 BINARIO 

N2 DECIMAL 

PR0CEDIMEMD 

1000 


8 

1x8 = 8 (8 ea potenciaqao da base 

2 na posigSo 4). 

11 1000 


56 

32 + 16 + 8 - Soma dos valores rela¬ 
tives as posiqOes 6, 5 e 4, 
onde o digito e 1. 

1010 1111 

4 

175 

128 + 32 + 8 + 4 + 2+1 - Sana dos 
produtos das posigcSes em 
que o digito d 1. 

11 0101 1001 

= 

857 

512 + 256 + 64+ 16 + 8 + 1- Idem. 

1100 0011 0101 

= 

3125 

2048 + 1024 + 32 + 16 + 4 + 1 - Idem. 


102 
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OONVERSSO DECIMAL PARA HEXADECIMAL (BASE 10 PARA BASE 16) 


CONVERSED HEXADECIMAL PARA DECIMAL (BASE 16 PARA BASE 10) 


A conversao e feita atraves de divisSes sucessivas do numero de 
cimal por 16, anotando-se os restos das divisSes, ate o quociente tor- 
nar-se menor do que o divisor 16. 0 numero convertido e formado pelo ul 
timo quociente e os restos das divisOes feitas, lidos na ordem inversa 
aquela em que foram obtidos, e convertidos para os sinibolos hexadeci- 
inais correspondentes. Seguem-se exemplos: 


N2 DECIMAL 

N2 HEXADECIMAL 

PROCEDIMENID 



114 

72 

114 : 16 = 7 com resto^ 2 


236 

EC (E=14/C=12) 

236 : 16 = 14 com resto^ 12 


1520 

5F0 (F=15) 

1520 : 16 = 95 can res to 0 

95 : 16 = 5 can resto 15 


16384 

4000 

16384 : 16 = 1024 
1024 : 16 = 64 

64 : 16 = 4_ 

can resto 

can resto 

can resto^ 

a-'' ^ 

o|o|o| 

24564 

5FF5 (F=15) 

24565 : 16 = 1535 

1535 : 16 = 95 

95 : 16 = 5 

com resto 

com resto 

com resto 

i) 

15 * 


ObservagSo: A conversao de numeros decimals ate 255 pode ser feita di- 
reta e facilmente com auxilio da tabela HEXA-DECI. 

A conversao de numeros decimals superiores a 255 pode ser 
feita primsiramente para numeros de base 256 e estes convertidos dire- 
tamente com auxilio da mesma tabela HEXA-DECI. Exemplos: 

N9 DECIMAL N9 HEXADECIMAL PRQCEDIMENIO 

32600 - 7F58 32600 : 256 — 127 com res to 88 

(Tabela: 127 = 7F e 88 = 58). 

30150 = 75C6 30150 : 256 = 117 com res to 198 

(Tabela: 117 = 75 e 198 = C6). 


A conversao e feita: prime iramente convertendo-se os simbolos he 
xadecimais para seus equivalentes decimals e em seguida nultiplicando- 
se estes pelo valor relative a potenciagao da base 16 nas posigSes cor 
respondentes aos mesmos na escala de pesos, sendo a sema desses produ- 
tos o numero convertido. 

Sao apresentadas a seguir duas tabelas que facilitam conversQes: 


XABE1A IE POTENCIAS DAS F0SIQ0ES (BASE 16) 


P0SIQ&) 

4 

3 

2 

1 

POIENCIA 

16 3 

16 2 

16 1 

16° 

VALOR RELATI70 

* 4096 

* 256 

* 16 

* 1 


TABELA EE BQUIVALENCIA HEXADECIMAL-EECIMAL 



0 = 0 

4 = 4 

8 = 8 

C = 12 


1 = 1 

5 = 5 n 

9 = 9 

D = 13 

- 

2 = 2 

6 = 6 

A = 10 

E = 14 

3 = 3 

7 = 7 

B = 11 

F = 15 



Exemplos: 

N2 HEXADECIMAL 

N2 DECIMAL 

PROCEDIMENIO 

IF 

31 

(1x16)+(15x1) 

93 

147 

(9x16)+(3xl) 

4E4 

1252 

(4x256)+( 14x16)+(4x1) 

4000 

16384 

(4x4096)+(0x256)+(0xl6)+(0xl) 

7F58 

32600 

(7x4096)+( 15x256)+(5x16)+(8x1) 

flit 

4321 = Posig<3es 




Obs.: Para converses de numeros hexadecimais de dois sinibolos 
apenas, a conversao podera ser feita diretamente com auxilio da tabela 
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HEXA-DECI. 


OOWERSOES RAPIDAS: Numeros hexadecimals de 3 ou 4 digitos poderSo ser 

considerados em base 256, convertidos para n um sros 
de base 256 em decimal., corn auxrlio da tabela HEXA-DECI, e em seguida 
para numeros decimals. 

Tcmemos cono exemplo o numero 7F58: 

- considerado em base 256 = "7F(H)58)" 

Consultando a tabela HEXA-DECI, acharenos: 7F = 127, 58 = 88. 

- convertendo-se para base 256 decimal = "127(D)88" 

- resultando: (127x256)+88 = 32600. 

Outro exemplo: numero hexadecimal 63D8: 

- considerado em base 256 = "63(H)D8" 

Consultando a tabela HEXA-DECI, acharenes: 63 = 99, D8 = 216. 

- convertendo-se para base 256 decimal = "99(D)216)" 

- resultando: (99x256)+216 = 25560. 
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CONVERSE) BINARIO PARA HEXADECIMAL (BASE 2 PARA BASE 16) 
CONVERSED HEXADECIMAL PARA BINARIO (BASE 16 PARA BASE 2) 


Os nuneros binarios s3o escritos em grupos de quatro digitos^ se 
parados uns dos outros por espago, sendo cada grupo convertido para o 
correspondents hexadecimal, de acordo com sua equivalencia: 

A conversao de numeros hexadecimals para binarios e feita pelo 
processo inverso. 

E apresentada a seguir uma tabela de equivalencia, para facili- 
tar as conversbes: 


TABELA DE EQUIVALENCIA NOMEROS HEXADECIMAIS E BINARIOS 



Seguem-se exemplos de conversOes: 


N2 BINARIO 

1010 

1001 

0010 

0001 



= 

A 

9 

2 

l 

... 

HEXADECIMAL. 

N2 BINARIO 


0111 

1011 




= 


7 

B 


... N2 

HEXADECIMAL. 

N2 HEXADECIMAL ... 

A 

5 

3 

C 



= 

1010 

0101 

0011 

1100 

* « • 

N2 BINARIO. 

N2 HEXADECIMAL ... 


1 

F 




= 


0001 

mi 



N2 BINARIO. 
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fqnqDes mmemhcas no tk 

Poderos afirmar, sem exagero, que as fungSes matematicas do IK, 
aliadas aos recursos de programagSo de que dispSe, trans formara-no numa 
poderosa calculadora cujos limites s2o apenas os conhecimentos e a i- 
maginag3o de seu usuario. 

N3o e nos so proposito explorar nestas poucas paginas as fabulo— 
sas possibilidades que esse maravilhoso aparelho oferece, nom contamos 
com capacidade para tanto. 

Atendo-nos ao escopo deste trabalho, curnpre-nos apenas relacio- 
nar e descrever sucintamente as fungDes disponiveis no mesne e, atra- 
ves de pequenos programs, propiciar ao usuario principiante nogOes 
basicas de sua utilizag2o, deixando a seu cargo a explorag2o adequada 
e maxima desses recursos para t2o logo quanto dominio e conhecimentos 
seus Ihe permitirem. 

HJNC^Q ABS: Atraves desta fungSo o computador fomece o valor 
absoluto ou T ’modulo" de um valor numerico relativo. * 
’MSdulo" ou valor absoluto de -347 e 347, de + ou ^1000 e 1000. 

FUNQS) SGN: Fomece o valor uni tar io +1 ou -1 (sinal) gerador de 
um numero relativo posit ivo ou negativo, ou o fa tor 
0 de um numero neutro. 

FAKEwitSES (): Cabe observar aqui que os parenteses, quando usa- 

dos em expresses matemticas, funcionam como co- 
mandos especiais, indicando ao computador que as instrugSes de opera- 
g<5es contidas pelos mesmos devem ser executadas prioritariamente em re 
lag3o as demais. 

A seguir e apresentado um pequeno programa que ilustra as duas 
fungOes acima descritas, ABS e SGN, alem de exemplificar alguns outros 
usos das fungOes INI, RND, IF, ja vistas no capitulo 0 BASIC SEM FO- 
LEIOS, AKAVES DO USO. 


Tendo em vista a necessidade de exatidao e utilizagSlo de certos 
recursos graficos disponiveis sccnente no proprio microccmputador TK, a 
partir deste ponto a maioria dos programas que ser2o introduzidos nes- 
te trabalho sera apresentada na forma de listagens impressas pela enge 
nhosa impressora produzida especialmente para microcomputadores da li 
nha Sinclair. 

Cbnsiderando a finalidade didatica deste trabalho, as listagens, 
n3o obstante n2o serein introduzidas precedidas da palavra "digite", de 
ver3o ser normalmente digitadas pelo leitor praticante, ja que e esta 
a raelhor maneira de fixar os conhecimentos adquiridos. 



Tecle KON e NEW LINE e observe cent) s2o interpretados os numeros 
gerados pelas instrugDes das linhas 5, 10 e 30, com sinais positivos e 
negativos. As linhas 80, 90 e 140 ilustram as fungSes SGN e ABS, inclu 
sive a lihha 150* Fode o program algumas vezes para melhor assimilar 
seu desempenho. Note cono a linha 10 torn negativo o numero gerado pe 
la linha 5, caso o mesmo seja igual ou exceda o valor 5. 

0 resultado tipico de uma rodada do programa e apresentado a se- 
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guir, copiado pela impressora diretamente do video: 



FUNCSO EXP: Fomece o numero "e TT elevado a potencia indicada. 0 
numero "e", cujo valor e 2,71828..*, e a base dos lo 
garltmos naturais ou neperianos (de John Neper), assim cocrt> 10 e a ba¬ 
se dos logaritmos decimals ou de Briggs. 

Sabemos que o logaritmo de um numero e o expoente a que se deve 
elevar a base adotada, is to e, a base do sis tenia de numeragSfo ao qual 
pertence esse numero, para obte-lo, e que a base de um sistema de lo- 
garitmos e o numero cujo logaritmo nesse sistema e a unidade. 

Assim, 1 e o logaritmo natural de M e n (ou 2,71828), cano 1 eolo 
garitmo decimal de 10, sendo "e" = 2,71828 e 10 - 10. 

Elevar "e" a uma potencia indicada, por exemplo signifies 

elevar 2,71828 h sua terceira potencia, resultando 20,08553. Elevar 10 
a sua terceira potencia results 1000. 

Os computadores de logics SINCLAIR incluem o sistema neperiano 
em suas fungOes ja definidas como rotinas intemas. Is to quer signifi- 
car que, desejando-se elevar M e M a 32 potencia, basta comandar PRINT 
EXP 3. 0 resultado sera 20.085537. (Lembremos que no computador a vir- 
gula e substituida pelo ponto, em se tratando de numeros.) 


A potenciagao de outros numeros no IK e feita atraves da fungao 
simbolizada por ** (2 asteriscos, na tecla H). Para elevar 10 a tercei 
ra potencia, por exemplo, devera ser feito o comando PRINT 10**3. 0 re 
sultado, obviamente, sera 1000. 

Experimente comandar: 

PRINT EXP 3 
PRINT 10**3 
PRINT EXP 12 
PRINT 10**12 

RJNQSO Us f: Fomece um logaritmo "natural", is to e, da base "e 11 - 
IN e a fungSo inversa de EXP. 

Experimente comandar: 

PRINT LN 20.085537 

0 resultado sera 3, obviamente, que e o logaritmo natural do mi- 
mero fomecido. 

0 TK n2o inclui em suas fungOes ja definidas intemamente o for- 
necinento de logaritmos decimals. Para obte-los, e necessario dividir 
o IN do numero em operagSo por IN 10. Assim, para obter o logaritmo de 
cimal de 1000 conande: 

PRINT LN 1000/LN 10, resultando 3. 

Experimente ainda: 

PRINT IN 15625/IN 10 

PI (Letra grega n): Nao obstante estar incluido como fungao mate 
matica, na verdade representa apenas o valor numerico da relagao cons 
tante entre o cosnprimento de uma circunferencia e o canprimento de seu 
raio, ambos expressos com um mesma unidade. 0 valor aproxiirado de PI 
e 3,141592653... 
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ttn exemplo classico da aplicag^o de PI e a msdida da circunferen 

cia: 

OMPBJMEmO DA cmOJNFESENCIA = Rx2PI ou DxPI, onde R = raio e D 
= diametro- 

Experinente o comando dire to: 

PRINT 0,7xPI 

onde 0,7 equivale a 0,7 m e represents o diametro da roda de uma bici- 
cleta, e constate que a cada volta dada a roda faz urn percurso de apro 
xinadamente 2,2 m. 

FUNC&) SQR: Fomece a raiz quadrada de um numero X* 

Rememorando, a raiz de um nunBro e a quantidade que, toraada de- 
termnadas vezes conr> fator, form outra quant idade chamada potencia. 
0 numero de vezes que a raiz entra como fator e chamado indice. A raiz 
e indicada pelo simbolo V , chamado radical. 

A resolupao da express So V 144 e obtida no microcomputador atra- 
ves do comando: 

’ HUNT SQR 144 

cujo resultado sera 12, obviamente. 

ExtraqSo de raiz quadrada ou de indice 2 e um rung So ja defini- 
da no roicroprocessador do IK, nSo havendo no mesmo, entretanto, defi- 
nigSo para extragSo de raizes de outros indices, como cubico, quarto, 
quinto etc. 

No IK a extragSo de raizes de indice superior a 2 e feita utili- 
zando-se o recurso inverse, ou seja: elevar o numero a potencia do va¬ 
lor inverso do indice da raiz, ja que, como sabemos, ^extrair a raiz de 
um numero equivale a elevar esse nunero a potencia onde X e o indi 
ce da raiz que se quer extrair. Assim: 

5_ 1 

V 3125 equivale a (3125)5 , cuja raiz e 5. 
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5_ 1 

V 759375 equivale a (759375)5 , cuja raiz e 15. 


HJNO0ES SIN* COS, TAN: 


SIN fomece o valor do seno de um angulo no circulo, sendo o cir 

culo considerado o trigonanetrico. 

COS idem do co-seno. 


TAN idem da tangente. 

0 angulo cujos valores SIN, COS e TAN sSo desejados deve ser ex- 
presso em radianos, sendo um radiano — 0,01745329 grau. Assim, um an¬ 
gulo de 30 graus e “ a 0,5235987 radiano. Para se obter um dos valores 
em questSo de um angulo de 30 graus, por exemplo, deve ser feito o se- 
guinte comando 

PRINT SIN 0.5235987 

0 resultado obtido, como sabemos, sera um valor relative - real- 
nente relativo - ao raio do circulo trigonometrico em que esta inscri 
to o triangulo a que pertence o angulo. 


FUNQCES ASN, ACN, AIN: 


ASN fomece a medida em radianos do arco-seno. 


ACN idem do arco-co-seno. 


ATN idem do arco-tangente. 

Estas iredidas s3o calculadas pelo computador com base nos valo¬ 
res respectivos de SIN, COS e TAN que lhe sSo fomecidos, ja que s2o 
fungSes inversas umas das outras. 

Assim, se se quiser a medidg do arco de um seno de valor 0,5, o 
comando a ser feito e: 

PRINT ASN 0.5 

cujo resultado sera 0.5235987 radiano (= 30 graus), que e o angulo ou 
arco ao qual pertence o seno. 


113 



Segue-se um pequeno program para ilustrar o que foi explanado: 


1 P.tz M r UNC0E5 i RXG0N0HEl PI 0 HS 
5 PPIr4 T "ANGULO EH GRhUS? 11 ; 

■’A Tt.irdiT 5 
j. -L :*< — L‘ : H 

■“i 0 p p T j._!” p 

30 IP R >-130 THEN GOT0 150 
h -0 l_ izT t' — m y a y I 7 4 - i iz! y w» 

50 PRINT ,T ! - RNGULO DE ‘; R; 11 


n. hl- irih 

LJ 0 rt I NT J N U — J O X N 

70 PRINT "CQ-SENQ = "; COS B 
80 PR INI "TRNGENTE - *’ ;ThN B 
90 PRINT ; ^ 11 RPCO-SEND = ; R:=«N 

i 5IN B) 

100 PRINT : 1 RPCO-CO-5EN0 = “* ;flCS 


•= » 3 
w' 

I NT 


l UUS &) 

*5 i7t “: T k !“1* * • «*“i I”I i'* 1 i“*'i “ i"“"i k ! i” f, ^ _ ;j . .—7“ 

1 ’•-» rr'.ii’H nr*.*«.• w- i nNis&Nl C = , HI 

N { I RN 8» 

I2S PRINT , ; "RPERTE SURLOUER TE 

l~- i 

n 

■1 i•— ” A w 

-_1 *£: 7** 5_ w ^ u. 

14.0 CL5 

*; ? ws i"*"' i m IT 
,J_ ij I M 


^ ^ ^ j 


0 X M p 0 S 5xU E L 


1: - 8 P RIN * j /’tNiRE C 0 H H N G U L 0 H 
ENOR : I{ ; 

m o i^r "* ni i i^i m i"^v 
^ O 1 m ?jt r ^ 


0 resultado txpico de um rodada do program e apresentado a se- 
guir f copiado diretamente do video pela impress ora: 


~“*i feji”’I !! i"i CTU i — • ”t t“ 1 J -X 'T 1 

rf t *4 ».r i_ *_» i_ n »j « ri«_»C‘ : ■«* *J» 

= RNGULO DE 0.575S5S67 RRDIRNOS 

SEMQ_= 0 « 54-4-53$05 

C0-5EN0 = 0*83357055 
TRNGENTE = 0,64.94.0762 

RRC0-5EN0 = 8*57595857 

R I - *! 0 — c ’ ■" ‘3 ^ i '* i_j s ij i b 7 w 1 y !—; 0 "/ 

HRL*U —ThN^ — 0*5759585*7 


r"j H iZ. H! ! 0 O R L y L* lL W T »*“ *~t I R 


Atenc3o: Para raaior facilidade e compreensao, o angulo cujos va- 
lores ser3o calculados e fomecidos pelo microcomputador devera ser 
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expresso em graus. Atraves da instrugSo da linha 40 do prograna o ccm- 
putador faz a convsrsao para radianos. 

Tecle RON e NEW LIN E. Fomega varias nedidas de angulos para ve- 
rificar ou estudar os resultados. 

Deve ser observado ainda que as fun^bss ACS e ASN fomecern resul 
tados errados se os arguroentosj isto e> os valores fomecidos de seno 
- SIN - e co-seno - COS - n2o estiverem entre -lei, pois os tnesmos 
nSo existem abaixo ou acima desses valores, razAo pela qual a linha 30 
do programs acima limita os calculos a angulos de ate 179 graus. 

ConversOes de graus para radianos podem ser feitas atraves da se 
guinte formila: 

G/180xPI, onde G = graus. E de radianos para graus: 

R/PIxl80, onde R = radianos. 

Seguem-se dois programas relacionados cam trigoncmetria, anfcos e- 
laborados para exibirem os mais variados graficos das fungOes seno e 
co-seno e calculos e graficos da tangente: 
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Depois de digitado o program: 

Tecle RUN e'NEW LINE. Fomega os dados que o computador solici- 
tar atraves do video, para que o grafico correspondents seja exibido. 

Aperte qualquer tecla - menos BREAK - para novos ciclos do pro- 
grama, can a exibigao de graficos diferentes, que serSo obtidos median 
te o fomecimento de medidas diversas de cocrprimento e amplit ude . 

Rode o program algumas vezes a fim de observar bem os efeitos 
xecutados pelas instrugSes das linhas 10 a 150. 

S3o apresentados a seguir dois graficos tipicos do program: 
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i rt> 


to 10 to to D:i 1010 H* H- ail--' 



i REM CRL 0 UL0 w SRfir 1 0 0 DP iP 
NGENTE _ __ 

10 PR IN 1 85 RNGULG? iP.Tiz 7 ) !! 

P0 INPUT P 

30 IP R > 7 5 TriEN GOT0 20 
4-0 PRINT ”GRRU5 : 5t .» R 
50 PR IN I : , " i PNG . DE P: * 

60 LET Bsflr0.0174-53293 
70 LET T=TPN 8 
30 PRINT T 
90 FOR 0=0 TO 53 
100 PL0l C,0 
110 NeX! 0 

* —i r“ i_ ”r "( V » A — “r |Z T' 

i ^ j (_•« f t i_i f^l . ■ 

■* “■ “ ZZ” i V % ,4 ~Z l_i ■— V. I j—* j—< • "I 

J. KJ — S I TA / ; n t-j 'J : w — k —‘ 

■*i A i"l —t S ”t i V T K l*T i \ " V 

150 NEXT X 

ISO PRINT RT 2©,5j“PNG fl" 

?© PR INI hi 3,10 ; l! a; * ; RT 17.: 20; 


80 

♦ /V i 

#_i j 

i 1 

90 

“ i * r"j“ 
7" ! 

A iTV 


J_J j 

!j|! £* 

10 

PLOT 


20 

plot 


30 

PLOT 



A ™i ) r™i T m 

h- ruw ! ^ 

w iTV i i~r * w 

i ^ ^ : 1 

t' 0 r — 0 
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Depois de digitado o programs: 

Tecle RUN e NEW LINE* Fomeqa o dado solicitado pelo cornputador 
e, corno de costume, observe bon os diversos efeitos do programs* 

Experimente entrar can um angulo de 45 graus e note como a tan- 
gente do grafico corresponde ao calculo fomecido, is to e: TANGENTE - 
1 RAIO. 

A linha 30 do programs limits os angulos a serem introduzidos a 
75 graus em razSo das limita90es do video. As linhas 180 a 260 criam o 
segmento do circulo. A linha 60 transforms graus em radianos, que e o 
sistema utilizado pelo inicrocomputador. 

Segue-se um grafico tipico do programs, copiado pels impressora. 
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PRDGKAMAS FINANCEIROS 


A capacidade e possibilidades de calculos de um microccmputador 
s3o praticamente ilimitadas* 

As fungSes matematicas ja incluidas no seu sistema operacional e 
os inumeraveis recursos de programag2o de sua lingusgem de interprets— 
g2o, inteligente e criativamente conjugados pelo usuario, permitam rea 
lizagQes verdadeiramente incriveis. Quem conhece alguns dos melhores 
programas utilitarios e recreativos disponiveis no mercado sabe qu2o 
verdadeira e essa assertiva. 

Apresentarros a seguir cinco pequenos programas financeiros, de u 
so pessoal ou familiar praticamente obrigatorios nos dias atuais, que 
poderSo dar uma pal ids ideia das potencialidades descritas, ao mesrno 
tempo que oferecem exanplos de recur sos para programas afms. 

Os quatro primeiros programs dispensam instrugSes para sua uti- 
lizagSo. Depois de postos em operagao no microcanputador, sera apenas 
necessario introduzir via teclado os dados solicitados atraves do vi¬ 
deo para obter prontarrente os resultados elaborados pelo canputador. 

Apos a listagem de cada programa e apresentado um quadro tipico 
do mesmo, copiado diretamente do video pela impressora. 
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NOTA: Para tomar o programa mais rapido: 

- Substituir a linha 100 por 100 FAST 

- Alterar o numero da linha 180 para 

- Acrescentar uma linha: 180 SLOT. 





























































































































Para rodar em FAST, acrescentar as seguintes linhas: 

35 FAST 
455 SLOW 
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0 programa foi elaborado para conferencias ou calculos de rendi- 
mentos de cademetas de poupanga ate 12 meses. Para aumentar esse pra- 
zo o valor atribuido a variavel N na linha 10 do programa devera ser 
modificado. 

Caso seja alterada a atual remunerag£o de juros de 0,5% ao mes, 
o fator 1.005 da linha 220 devera ser alterado correspondentemente. 

Una vez introduzido o valor inicial aplicado, o programa ira so- 
licitando atraves do video as taxas de corregSo monetaria e saques ou 
depositos eventuais de cada mes. Introduzidos os dados, via teclado, o 
saldo acumulado do mes sera imediatamente apresentado, corrigido e a- 
crescido dos juros normais. Deve ser letribrado que um deposito feito de 
pois do dia do mes de referenda da cademeta so e valido para corre- 
g3o e juros no mes seguinte, devendo portanto ser langado de acordo. 

Para interrotnper a sequencia num deteiminado mes, bastara digi- 
tar 0 (zero) quando p computador solicitar a taxa de corregao do mes. 

N2o havendo saques nem deposito, devera ser fomecido tanibenova 
lor 0 quando o computador solicitar esses dados no mes em processamen- 
to. Se porventura ocorrerem ambos, deve ser apurada a diferenga e in- 
troduzida apenas esta, como saque ou deposito, ou seja, a do que preva 
lecer. 

Se o programa puder ser de grande serventia, sera aconselhavel 
te-lo gravado em fita K-7, para utilizagSo rapida a qualquer momento. 
Antes de fa 2 §-lo, porexn, leia o capitulo seguinte a este, MANIFULANDO 
DIVERSOS PROGRAMAS A UM SO TEMPO, ja que podera ser interessante agru- 
par na mesma gravagSo os outros programas financeiros apresentados. 
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MAJSTIPULANDO DIVERSOS PROGRAMAS A UM SO TEMPO 


No capitulo GRAVADOR K-7, A OUTRA METADE DO MICRDCCMFUTADOR, fi- 
zemos alusSo ao fato de os microcomputadores chanados de M uso pessoal" 
n3o poderem ranipular programas complexes e extensos aun so tempo, em 
raz3o das limitagSes de suas memorias, e que produzir os mestnos can ire 
morias agigantadas so se justificaria em casos excepcionais, mesmo por 
que quase todos podem ter suas tnenorias "expandidas" atraves de insta- 
lag3o de tnanorias adicionais ou implementos apropriados produzidos pa¬ 
ra esse fim* 0 IK 85, por exemplo, e vendido atualmente an duas trodali 
dades, de 16 e 48 K Tt bytes n , podendo o primsiro receber expansao poste 
rior mediante solicitagao ao fabricante. 

Mas, em verdade, nada impede que diversos programas possam ser a 
grupados e carregados no microcomputador concanitantemente, para mani- 
pulagSo altemada, desde que obedecidas duas regras basicas e normals: 

- NSO EXCEDER A CAPACIDADE DA RAM; 

- CADA PROGRAMA TER NUMERALS) DE LINHAS SUPERIOR AO ANIEXEDENIE, 

ISTO E, AO PROGRAMA QUE 0 PRECEDE* 

Alguns poucos cuidados s§o necessarios, por precaugSo: 

- separar um programa do outro com um linha de instrugSo de pa- 
rada, STOP, no fim de cada um; 

- se os programas utilizarem variaveis, numericas ou alfanumeri- 
cas, colocar no comego de cada um uma linha de instrugSo CLEAR, para 
que n3o haja problemas no caso de utilizagao de variaveis analogas nos 
diversos programas* 

- para facilitar a manipulagao do conjunto, colocar no inicio um 
’'menu" e em cada programa uma instrugao de retomo opcional ao mesmo. 
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Com base no exposto, e a titulo de exemplo, vamos agrupar os pro 
gramas apresentados no capitulo PROGRAMAS FINANCEIROS, ja que os refe- 
ridos tan finalidades proximas e poderao ser eventualmente usados sem- 
pre numa mesma oportunidade. Agrupados e gravados em fita K-7, sera fa 
cil e proveitosa sua utilizagao a qualquer momento* 

Fagamos primeiramente o menu: 



Digite agora o programa AFLICAQSD DE CAPITAL do capitulo mencio- 
nado acima, numerando suas linhas a partir de 210, isto e, acrescentan 
do 200 a cada numero ja existente - para facilidade de controle das al 
teragOes - e alterando as instrugSes e desvios GOLDS e GOSUBS corres- 
pondentemente. 

Acrescente no mesmo duas linhas iniciais: 

200 CLS 
205 CLEAR 
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Altere a linha de numero original 200 para: 


Altere a linha de numero original 140 para: 

340 IF R$= ll N t1 THEN ODTO 5 

Suprima a linha de numero original 150* 

Acrescente uma ultima linha de instrugSo, por precaug^o, para e- 
vitar que os programas se misturem no caso de algum lapso: 

380 STOP 

Proceda da mesma forma com o programs AFLICAQAO PRCGRAMADA, nume 
rando suas linhas a partir de 510, isto e, acrescentando 500 a cada nu 
nero original de linha de instrugSo. Altere tanibem as ins trusses QOTOS 
e GOSUBS correspondentemente . 

Acrescente ao mesmo duas linhas iniciais: 

500 as 

505 CLEAR 

Altere a linha de numero original 200 para: 

700 IF R$="N" THEN GOTO 5 

Elimine a linha de numero original 210* 

Acrescente a ultima linha de precaugao: 

740 STOP 

Adote o mesmo procedimento com relagSo ao programa TAXA DE FINAN 
CIAMEOT0, numerando suas linhas a partir de 810, isto e, acrescentan¬ 
do 800 a cada numero original de linha do mesmo, n2o esquecendo de al- 
terar tanibeni as instrugDes de desvios G0T3S e GOSUBS em conformidade • 

Introduza no mesmo duas linhas iniciais: 

800 OS 

805 CLEAR 


1000 IF R$= ,, N m THEN GOTO 5 

Elimine a linha de numero original 210* 

Acrescente a ultima linha de precaug2o: 

1040 STOP 

Faga as alteragDes necessaries tairiben no programa VALOR DA PRES 
TAQAO MENSAL, numerando suas linhas a partir de 1110, isto e, acrescen 
tando 1100 a cada numero original de linha de instrugao, nSo esquecen¬ 
do de fazer o mesmo nas instrugSes de desvios G0TOS e GOSUBS. 

Introduza no mesmo duas linhas iniciais: 

1]00 OS 

1105 CLEAR 

Altere a linha de numero original 150 para: 

1250 IF R$“ f1 N" THEN GOTO 5 

Elimine a linha de numero original 160. 

Acrescente a ultima linha de precaugSo: 

1290 STOP 

Proceda igualmente com o program CADERNEIA DE P0UPANQA, numeran 
do suas linhas a partir de 1410, isto e, acrescentando 1400 a cada nu¬ 
mero original de linha de instrugSo, alterando tanibem as linhas de des 
vios G0TOS e GOSUBS. 

Introduza no mesmo duas linhas iniciais: 

1400 as 

1405 CLEAR 

Altere a linha de numero original 480 para: 
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1880 IF R$="N" THEN GOTO 5 


Elimine a linha de numero original 490. 

Confira as alteragSes feitas, com especial atengSo nas linhas de 
instrugOes de desvios GOODS e GOSUBS, e rode o programa para constatar 
a conodidade de, em certos casos, ter programas agrupados. 

Grave em seguida o conjunto assim obtido, fazendo o comando: 

GOTO 1920 e NEW LINE. 

Caso queira controlar a quantidade de T 'bytes 11 ocupados pelos pro 
gramas agrupados, faga o comando dire to: 

PRINT PEEK 16404+256*FEEK 16405-16509 e NEW LINE. 

Se for agrupar mais algum programa ou acrescentar novas linhas e 
instrugOes e estiver se aproximando do limite de memoria RAM do compu- 
tador, o controle pode ser efetuado a cada acrescimo, colocando o co- 
mando acima ccmo linha de programa, proximo do numero extremo superior 
do canputador, digamos 9990 (o ultimo numero possivel no TK e 9999), e 
sempre que quiser aquela informacSo, basta fazer o comando dire to: 

GOTO 9990 e NEW LINE. 

Agrupamentos de programas que contenham linhas REM can codigos 
em linguagem de maquina se recanendam apenas a usuarios can rnuita expe 
riencia, en razSo de que as alterag<5es necessarias, especialmente as 
dos enderegos dos codigos, serem razoavelmente complexas. 

Deve ser acrescentado que o agrupamento exemplificado pode ser 
feito diretaxnente de programas ja gravados em fitas K-7, can auxilio 
de urn programa renumerador e acoplador, este ultimo conhecido cano M si 
mulador merge 1 '. 


SIMULANDO DATA. READ, RESTORE 

Tais instrugSes, existentes em alguns computadores core rotinas 
residentes, permitem que nura programa seja estabelecida uma tabela can 
dados - DATA - que podem ser obtidos e usados sequencialmente pelo pro 
grama, a medida de sua conveniencia - atraves de READ - e, quando a ta 
bela e esgotada, pois permite apenas uma leitura de cada dado, ehane 
cessidade de dispor novamente dela, a mesma e restabelecida atraves de 
RESTORE. 

No TK essas instrugDes devem ser programadas. 

Para a tabela propriamente dita - DATA - usa-se uma variavel al- 
fanurrerica qualquer, por exemplo T$, e para que a tabela fomega os da 
dos em sequencia e possa, depois de esgotada, ser restabelecida - RES¬ 
TORE - e usada uma variavel ccxnum, por exemplo R, a qual deve ser atri 
buido urn valor inicial 1. 

Supondo que os dados da tabela devam ser meses do ano, as instru 
g5es terSo a seguinte configuragSo: 

10 LET T$- 1 JANEIFO/FEVEREIRO/ MARQO" etc. 

20 LET R=1 

A leitura da tabela - READ - sera feita por uma siibrotina do pro 
grama, colocada no fim do mesmo, atraves de uma instrugSo comm de des 
vio GOSUB, colocada no ponto onde deve ser feita a leitura de um dado 
da tabela ou onde for conveniente. Sua configuragSo sera: 

100 GOSUB 5000 

. (linhas normals 

. do programa) 

5000 FOR Z=R TO LEN T$ 

5010 IF T$(Z)<>'7" THEN NEXT Z 
5020 LET L$=T$(R TO Z-l) 

5030 LET R=Z+1 
5040 RETURN 
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Os numeros das linhas de instrugSes poderSo ser quaisquer, desde 
que seja mantida a sequencia indicada, n2o podendo ser nudada sua com¬ 
pos i^So. 

Para melhor compreensao do que foi explanado, e apresentado a se 
guir um program com exemplificagSo: 
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Depois de digitado o program: 

Xecle RUN e NEW LINE. Fomega os valores que o program solici- 
tar atraves do video e observe corn funcionam as instrugSes sinulado- 

ras de 

DATA na Iinha 50, 

READ nas linhas 90, 230, 1000 a 1040 e 

RESTORE nas linhas 60 e 200. 

Ehibora h prirreira vista um pouco longo para ilustrar o funciona- 
Kento das instrugSes em questao, pretendeu-se tarribera dar atraves do pro 
gram um exemplo pratico de sua aplicagSo, envolvendo outros recursos 
anteriormente vistos. 

Quaisquer dados que tenham que ser repetidos frequentemente e nu 
na uesm sequencia num program podem ser agmpados nos moldes exertpli 
ficados. On certas situagSes o agrupamento e a utilizagSo de dados, es 
pecialirente quando sao nuitos e variados, devem ser feitos conform o 
sistem exposto, a fim de que sejam evitados erros de transcrigSo. Os 
irais diversos dados podem ser colocados num tabela: numericos ou alfa 
numericos, sendo necessario apenas agrupa-los conforms exposto acim. 

Una observagSo importance: as variaveis utilizadas nas instru¬ 
cts em questao n2o devem ser usadas em outras instrugSes do mesmo pro 
gram, sob pena de ocorrerem anomlias durante o seu funcionamento. 
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EELETADOR DE LINHAS RfiPIDO 

Em computag2o e frequente a necessidade de dele tar linhas de pro 
gramas, especialmente quando se trata de programs editores ou monito 
res que, uma vez usados para introduzir codigos em linguagem de maqui- 
na, por exemplo, devem ser eliminados na forma de deleg2o, is to e, sera 
o uso do cocnando NEW, para que os codigos introduzidos permanegam na 
manor ia do canputador. 

Quando um program editor ou monitor tem reduzido numero de li¬ 
nhas, a deleg5o linha por linha nSo chega a ser probleiatica. Mas ha 
programs nessa categoria que chegam a ter tal quantidade de linhas de 
instrugOes que sua eliminagao sem um deletador efioiente seria can cer 
teza desanirnadora, quando n2o pouco praticavel. 

Outras vezes, nura program em estudo e montagem queremos elimi- 
nar, para substituir, apenas parte do mesmo, a qual, sendo ex tens a, to 
ma tempo precioso que acaba perturbando o raciocinio e o trabalho, n2o 
raramente pondo este a perder on raz2o de um numero de linha digitado 
intercept ivelirente errado. 

Um deletador ccmo o que apresentanos a seguir visa evitar essas 
dificuldades: 

xxx LETT DLfFEEK 16425+256*PEEK 16426-51 
9500 LET ET^PEEK 16425+256*FEEK 16426 
9510 LET A=ET-DL+124 
9520 IET B=IOT (A/256) 

9530 IET A=A-B*256 
9540 POKE DL,A 
9550 POKE DL+1,B 
9560 CLS 

9570 PRINT 1 'DELETE A LINHA XXX" 

No caso de utilizagSo em programas edi tores ou moni tores, o dele 
tador devera ser incorporado a eles de form definitive. Veja o exem- 


plo no capitulo EDITOR ASSEMBLER 00M OTSJFERIDOR. Em outros podera ser 
digitado no nonento on que e necessitado, ja que e constituido por nu- 
nero de linhas relativamnte insignificante. 

A primeira linha do tresmo, de numero xxx qualquer, devera ser co 
locada um linha antes da parte a ser eliminada apos o uso, o que ge- 
ralmnte ocorre a partir da primeira linha do program editor ou moni¬ 
tor. Caso o mesmo ja inclua linhas REM para receber codigos em lingua- 
gem de maquina ou quaisquer outros dados ou ainda outras linhas inici- 
ais que devam permanecer, a linha xxx devera ser posicionada em segui- 
da as mesmas, recebendo nuneragao canpativel. Supondo-se que o numero 
da primeira linha a ser eliminada seja 100, a linha xxx podera receber 
o numero 99, ou mesrao 100, ficando assim: 

99 1£TDL=PEEK 16425+256-PEEK 16426-51 

A parte restante do DELETADOR devera ser colocada no fim do pro¬ 
gram a ser eliminado, recebendo qualquer numsragao superior a do mes¬ 
ne. Supondo que o numero de sua ultima linha seja 6900, o DELETADOR po 
dera ser numerado ccmo se segue: 

7000 LET ET=PEEK 16425+256*FEEK 16426 
7010 IET A=ET-DL+124 
7020 IET B=HSrr (A/256) 

7030 IET A=A-B*256 
7040 POKE DL,A 
7050 POKE DL+1 ,B 
7060 OS 

7070 PRINT "DELETE A LINHA XXX" 

Note que no DELETADOR s2o usadas duas linhas de instrugSes nuito 
parecidas can duas variaveis diferentes, DL e ET, n2o devendo as mss- 
tnas ser confundidas. 

0 program em processamento - nSo o DELETADOR - devera ser usado 
ou manipulado normalmente. Apenas por precaugSo, caso sua ultima linha 
n2o seja de retomo ou de parada, devera ser inserida ali, precedendo 
a parte final do DELETADOR, um linha de instrugSo STOP, por exemplo: 

6950 STOP 
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para que o prosseguimento do program n3o acione casualmente o DELEIA- 
DOR, eliminando tudo que estiver apos a linha *99 ou xxx. 

Para usar o DEUEIADOR, bastara fazer o comando dire to: QQNfeRIDOR (l v DNITOR) D£ QQDIQQS 


GOTO 7000 

e logo surgira no video a frase: 
DELETE A LIMA XXX 


N2o e raro acontecer: depois de digitado con todo o cuidado e pos 
to a rodar, o program vai para o ar , is to e, some do computador, is to 
acontecendo geralmente can programs que contem blocos on linguagem de 
maquina. 


Bastara ent3o digitar 99 e teclar NEW LINE e sera feita a elind 
nag3o ou delegSo imediata de todo o program que estiver apos essa li¬ 
nha, n3o demorando mais do que dois segundos a execugSo. 

No caso de o DELETADOR ter que ser inserido num program ja car- 
regado ou existente na memoria do tnicroccmputador, a linha xxx devera 
ser posicionada no ponto escolhido e com numeragSo compativel, devendo 
ser seguida de instrug2o suplementar - GOTO 7000 - na linha imediata. 
Supondo que a parte a ser eliminada seja da linha 501 ate o final, a 
linha xxx e a complemenuar deverSo ter a seguinte composig3o: 

501 LETT DL=FEEK 16425+256-PEEK 16426-51 

502 GOTO 7000 

As demais linhas - 7000 a 7070 - serao colocadas no fim do pro- 
grama e na mesma ordem ja descrita, naturalmente lembrando que a ins- 
trugSo da linha 7070, ao mencionar xxx em sua execugSo, refere-se a li 
nha 501. E para usar o DE1ETADCR, neste caso, devera ser feito o coman 
do dire to: 

GOTO 501 


Por essa raz3o, e sempre aconselhavel gravar em fita K-7 qualquer 
programs recem-digitado, ANTES DE RODA-LO, principalraente se incorporar 
retinas ou blocos em linguagem de maquina, alem do BASIC. Se acontecer 
de o programs M sumir ,T ao ser rodado, podera ser carregado da fita para 
o computador para pesquisa e corregSo. 

A parte em BASIC podera ser conferida diretamente, instrugSo por 
instrugSo, ou linha por linha, se for o caso. 

A parte em linguagem de maquina tera que ser conferida com o auxi 
lio de um programs conferidor cu monitor. 

No caso de o programs ter sido digitado com o auxilio de um pro¬ 
gram editor como o apresentado no capitulo EDITOR ASSEMBLER CCM CONFE- 
RIDOR, que permite grava-lo juntamente com o programs, para eliminagao 
posterior, isto e, depois de o programs ter sido testado, a conferen- 
cia sera facil* Alem do mais, para maior ccmodidade, o EDITOR referido 
incorpora o DEIETADOR DE LINHAS RAPIDO. Em caso contrario, todavia, po¬ 
dera ser introduzido na parte final do programa, via digitagSo, o peque 
no program conferidor apresentado a seguir, e feita a verificagSo: 


e quando aparecer a frase DELETE A LINHA XXX bastara digitar 501 e te¬ 
clar NEW LINE para ser efetuada a delegSo. 

0 DELEXADOR podera ser usado tanibem para eliminar um bloco inter 
mediario extenso de linhas, bastando para tanto ser posicionado adequa 
damente, isto e, a linha xxx antes ou no prdprio local da primeira li¬ 
nha a ser eliminada e a ultima linha da parte final, linha 7070, no lo 
cal da ultima linha do bloco a ser eliminado. 


Digite: 


9900 

9910 

9920 

9930 


LET V^xxx (x3pc = endereco do priroeiro VbyteV 
LET P=FEEK V &S codlgos a sergm conteria 6s.; 
SCROLL 

PRINT V;" : n ;CHR$ ( INT (P/16)+28);CHR$ (P-INI 
(P/16)*16+28); M = M ;P 


9940 PAUSE 4E4 
9950 LET V=V+1 
9960 GOTO 9910 
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Digite GOTO 9900 e tecle NEW LINE. AparecerSto no video: enderego 
da posigao de mexnoria e o codigo const ante do mesmo, este em notagOes 
hexadecimal e decimal. 

Aperte qualquer tecla - menos BREAK - para continuar a exibigSo 
desses dados em sequencia. 

Ao encontrar um erro anote nura papel o enderego e a corregSo que 
devera ser feita. 

Quando terminar a conferencia tecle BREAK e faga as corregCes a- 
traves do comando POKE. Por exemplo: se o codigo do enderego 16525 de- 
ve ser C6 em vez de 06, verifique na tabela HEXA-DECI qual e o codigo 
decimal correspondente - no caso 198 - e digite: 

POKE 16525,198 e tecle NEW LINE. 

Proceda da mesrn forma com os demais codigos errados, se houver. 
Quando terminar coloque uma linha STOP antes do CO^FERIDOR (MONITOR) 
EG CODIGOS, por exemplo 9890 STOP, e teste o programs corrigido. Se es 
tiver tudo em ordero delete o programa CONFERIDOR e grave definitivamen 
te o programa em processamento. 


EDITOR ASSEMBLER OCM CONFERIDOR 

0 programa tem por finalidade introduzir no computador codigos 
hexadecimais ou decimais para produzir rotinas ou programas em lingua- 
gem de maquina - linhas ou blocos ASSEMBLER - e conferir ou verificar 
os codigos introduzidos ou ja existentes. 

0 programa incorpora o DELEIADOR DE LINHAS RAPIDO, apresentado e 
comntado em capitulo de mesmo none, de forma a poder ser apagado fa- 
cilmente no computador apos o uso, sem afetar os codigos ja introduzi¬ 
dos. Incorpora tambem um produtor de LINHAS REM para quaisquer quanti- 
dades de caracteres, de grande serventia para editar prograraas em lin- 
guagem de maquina. 

A numeragao de linhas do EDITOR ASSEMBLER OCM OCMFERIDOR a par- 
tir de 9000 permite que, apos a introdugao dos codigos de linhas ou de 
blocos em ASSEMBLER de um programa, seja digitada tarrbem a listagem BA 
SIC que normalmente acompanha e ccxnplementa tal tipo de program, para 
que o rresmo seja testado antes da eliminagao do program editor, de ma 
neira que possa ser feita com facilidade uma conferencia dos codigos 
introduzidos, se houver falha que n3o resida na listagem em BASIC. 

E oportuno lerribrar aqui a conveniencia de gravar em fita K-7 um 
program recem-digitado, principalmente se contiver instrugQes em lin- 
guagem de mquina, ja que qualquer falha nas mesms podera fazer ir fa 
cilmnte "para o ar" todo o programa, caso em que a gravagSo feita per 
mitira recoloca-lo no computador para pesquisa e corregSo da falha. 


Depois de testado e aprovado o programa em montagem, o program 
EDITOR ASSEMBLER COM CONFERIDOR podera ser todo eliminado com a facil 
delegSo de um unica linha, como sera constatado. 

A primeira parte do mesmo consiste de um l \nenu n , onde a modalida 
de de execugSo e escolhida. Seus sete itens s2o: 

1 - INIR0DU2 CODIGOS HEXADECIMAIS 
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2 - JMRODUZ CCDIGOS DECBIMS 

3 - OONFEKE CODIGOS HEXADECIMAIS 

4 - OONEERE OODIGOS DECIMALS 

5 - GRAVA EDITOR/CONFERIDOR 

6 - PRDDUZ LE3HAS REMS 

7 - ELIMINA EDITOR/OCWFERIDOR 

A opq3o nurnero 5 efetua n3c sonente a gravagSo do programa EDI¬ 
TOR, mas tambem a do que estiver em montagem, caso seja necessaria u- 
ma interrupgSo para continuag2o posterior. 

Segue-se a listagem do programa, feita por impressora: 
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INPUT £ 
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INPUT R 
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Depois de ter digitado e conferido todo o programa: 

Digite: GOTO 9005 e tecle NEW LINE, Aparecera no video o 'te¬ 

rm" do programa, 

Apronte e acione o gravador para gravar, de preferencia c cm uma 
fita K-7 virgera e de boa qualidade. 


Press ione uma vez a tecla 5 do microccmputador e aguarde o term! 
no da gravagSo do EDITOR ASSEMBIER ODM (XXNFERIDOR. 

Faga agora algumas experiences com o programa, lenibrando que co 
digos para rotinas ou programas em linguagem de maquina devem ser colo 
cados em linhas REM ou em area reservada atraves da mrtipulagao da va- 
riavel RIP do sistema. N5o tente introdu 2 ir codigos se n3o tiver espa- 
co reservado para os mestnos. Vamos faze-lo nesta oportunidade atraves 
do proprio programa EDITOR: 

Press ione a tecla 6 do microcomputador. Surgira no video a per- 
gunta n QUANIDS CARACHERES?". 

Digite 100 e tecle NEW LINE. Em seguida: 

Digite 1 e tecle NEW LINE. Pennanecera como primira li 

nha do program a linha 2 REM can 100 caracteres 11 • n (ponto). 

Procedxmentos de experi§ncia: 

- digite GOTO 9005 e tecle NEW LINE* Aparecera o Tt menu ,T . 

- pressione a tecla 3* Surgira uma pergunta no video. 

- digite 16514 e tecle NEW LINE. Surgira outra pergunta. 

- digite 16550 e tecle NEW LINE. 0 video exibira 37 codigos hexa 

decimals IB e seus respectivos enderegos na memoria do micro- 
computador. IB e o codigo hexadecimal do caracter M . ,r da linha 
REM. Apos os mssmos havera uma pergunta no video. 

- pressione a tecla M. Se resolver pressionar C, repita o proces 
so e depois tecle M. Surgira o T Vnenu H no video. Made de item: 
pressione a tecla 4 e note outra pergunta no video. 

- digite 16514 e tecle NEW LINE. Nova pergunta no video. 

- digite 16560 e tecle NEW LINE. 0 video exibira 47 codigos deci 

mais 27, que e o codigo do caracter N da linha REM. Apos estes 
havera uma pergunta. 

- pressione a tecla M. De novo o ’tenu" estara no video. 

- pressione a tecla 1. Surgira uma pergunta. 
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- digite 16514 e tecle NEW LINE. Surgira o CURSOR L no canto in¬ 
ferior esquerdo do video e o numero 16514. 

- digite cinco ou dez codigos hexadecimais B3, sero espago entre 
os mssmos , e tecle NEW LINE. Os codigos surgirSo ordenados a- 
pos o enderego nencionado e separados por hifens. 

- tecle M e NEW LINE. 0 ’tesnu 11 estara no video. 

- tecle 2. Surgira de novo um pergunta. 

- digite 16525 e tecle NEW LINE. Surgira o CURSOR L no canto in¬ 
ferior esquerdo do video e o numero 16525 no canto superior. 

- digite dez codigos decimais 148, um por vez, teclando NEW LINE 
apos cada um . Os codigos serSo exibidos no video apos o endere 
rego indicado. 

- tecle M e NEW LINE. 0 ’’menu" estara no video. 

- tecle BREAK para interromper o program. 

- digite LIST e tecle NEW LINE. Observe cccm ficou a liriha 2 REM 
com os codigos B3 (hexadecimal) e 148 (decimal) introduzidos. 

- digite GOTO 9005 e tecle NEW LINE. 

Fag a mais experiencias com o programa EDITOR ASSEMBLER COM OONFE 
RIDOR. Familiarize-se com todos os recursos do mesrno, respondendo al- 
temativamente as perguntas exibidas no video. 

Nas opgOes 1 e 2, quando estiver introduzindo codigos e desejar 
voltar a um enderego para alteragSo ou introdugSo de codigo diferente 
do que consta ali, digite E em lugar do codigo e indique a seguir o en 
derego a ser acessado. Digite o novo codigo, tecle NEW LINE e digite E 
novamente para voltar ao enderego em que estava, indicando seu numero 
via digitagSo. 

1DNIAND0 DIVERSAS LINHAS REM: Supondo que se queira nrntar diver 

sas linhas REM, por exemplo: a pri 
rreira com 100 caracteres, a segunda com 150 e a terceira can 200, pro- 
ceda da seguinte forma, apos o programa ter sido carregado no microcan 
putador: 

1 - Apos o T \nenu" do programa estar no video, press ione a tec la 
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6 do microcomputador. Ao surgir a pergunta ’’QUANIDS CARACTE- 
RES? 11 : 

2 - Digite 200 e tecle NEW LINE. Surgira no video uma linha REM 

com 200 caracteres apos a linha 1 REM. 

3 - Digite 1 REM .. e tecle NEW LINE. (Devera ser exatamente co- 

mo citado: 1 REM .. (com dois caracteres 

4 - Pressione as teclas SHIFT e 6 shrultaneamente. 

5 - Pressione as teclas SHIFT e EDIT siraultaneamente. 

6 - Pressione as teclas SHIFT e RDB0UT sinultaneamente. 

7 - Digite 4 e tecle NEW LINE. 

8 - Digite 2 e tecle NEW LINE. 

9 - Digite GOTO 9005 e tecle NEW LINE. 

10 - Repita os passos 1 a 8, digitando 150 no passo 2 e digitando 

3 no passo* 7. 

11 - Digite GOTO 9005 e tecle NEW LINE. 

12 - Digite 100 £ pergunta "QUANIOS CARACTERES?" e tecle NEW LINE 

13 - Digite 1 e tecle NEW LINE. 

14 - Digite GOTO 9005 e tecle NEW LINE. 

15 - Passe a usar o programa EDITOR de acordo com os recursos ofe 

recidos pelo Tt menu M . 

0 programa em questSo podera ser nuito util desde introduzir co¬ 
digos para rotinas ou programas em linguagem de maquina ate verificar 
os codigos existentes em todos os enderegos do computador, tanto na me 
moria RAM ccmo na ROM. 

Faga duas qu tres gravagOes do mesmo. Sua utilizagSo podera ser 
bastante frequente. 
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Titulos, letreiros, molduras, paisagens e o que for imaginado po 
der2o ser desenhados apenas com o uso do "joystick 11 , ou das teclas cor 
respondentes, com facilidade e rapidez, e armazenados an variaveis al~ 
fanumericas, para as mais diversas utilizagOes. E o que o programa que 
apresentamos neste capitulo permite fazer. 

A reproduce apresentada a seguir, copiada diretamente do video 
pela impressora, e urn exemplo do que pode ser feito pelo mesno: 


Os codigos em linguagon de tnaquina entram em primeiro lugar. Pa¬ 
ra tanto, devera ser montado um pequeno programa editor: 

Digite: 3 REM. (24 pontos) 

10 POR 0=16514 ID 16537 
20 INPUT D 
30 SCROLL 
40 PRINT D 
50 POKE C,D 
60 NEXT C 

Tecle RUN e NEW LINE. Estando o CURSOR L no canto inferior do vi 
deo, lado esquerdo, introduza os codigos decimais que se seguem, um a 
an , com atengSo para evitar qualquer erro de digitag2o. Tecle NEW LINE 
apos digitar cada codigo. As barras nao devem ser digitadas, servindo 
apenas para separa-los: 

42/16/64/1/6/0/9/235/42/12/64/6/22/35/197/1/32/0/237/176/193/16/ 

246/201 

Tecle NEW LINE ao terminar. 



0 programa consta de uma pequena subrotina em linguagem de iraqui 
na e de uma parte em linguagem BASIC. 


Delete em seguida as linhas 10 a 60. 

Setn alterar ou mexer na linha 3, introduza a listagem BASIC: 
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Confira e faga uma gravagSo do programs antes de roda-lo. Se hou 
ver urn erro na subrotina em linguagem de maquina o programa podera ,T ir 
para o ar", caso em que devera ser carregado da fita para ser procura- 
da e corrigida, atraves do comando POKE, a falha porventura existente* 
Se for necessario use o programa OONFERIDOR (MAXTOR) EE OODIGOS, apre 
sentado no capitulo de mesmo nome. Se estiver tudo em ordem: 

Tecle RUN e NEW LINE para comegar a "pintar" no video* 0 pequeno 
"pixel" preto (caracter de PLOT) que aparece no centro da tela de TV 


podera ser rrovido para quaisquer diregOes com o uso do "joystick" - ou 
das teclas correspondentes - desenhando no video o que for desejado. 

Para APAGAR, CORRIGIR OU ALTERAR o desenho: 

- APERTE 0 DISPARADOR DO "JOYSTICK" OU A TECLA Oeo "pixel" tor 
nar-se-a piscante, transformando-se em APAGADOR. ]foviirente-o para apa- 
gar da mesma forma que para desenhar. 

Para RETORNAR A HDDALIDADE DE DESEKHADOR: 

- APERTE DE NOVO 0 DISPARADOR DO "JOYSTICK" OU A TECLA 0* 

Quando der o desenho por acabado, pressione uma vez a tecla 1, o 
que fara com que o desenho seja ARQUIVADO NA VARXAVEL A$ reservada na 
linha 250 do programs. 

0 PR0CESS0 SERA ENT&) REINICIADO PARA NOVO DESENHO, (XM 0 PEQUE- 
N0 T ’PIXEL" NO CENIRO DO VIDEO ESPERANDO SER DIRIGIDO PARA DESENHAR* 

Caso n5o deseje facer outro desenho, pressione apenas a tecla 1. 
A segunda tela sera entSo arquivada em branco e, novamsnte, o processo 
se reiniciara. 

Ao final da terceira tela, apos ter sido pressionada a tecla 1, 
o programa passara a exibir os desenhos feitos ou as telas em branco 
arquivados, bastando para tanto apertar qualquer tecla do computador, 
irenos BREAK, perguntando em seguida se se deseja ver os mesraos novamen 
te ou se se auer razer novos, e procedera era conformidade com nossa or 
dem, dada via teclado: exibira as telas ja feitas cu as destruira, co- 
locando novamente no video o "pixel" para produzir novos desenhos* 

0 programa tern variaveis dimensionadas para tres telas somente. 
Se houver necessidade de rrais, bastara acrescentar auas linhas de ins- 
trugSes para cada, nos moldes das linhas 250 e 260, incrementando se- 
quencialmente os nuneros de linhas de mstrugdes e as letras das vari¬ 
aveis alfanurrericas, procedendo correspondentemsnte com respeito as li 
nhas de instrugSes para exibigSo das telas. 

No caso de desejar usar os desenhos feitos em outros programas, 
delete o presente, is to e, o programa desenhador, com auxilio do dele- 
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GOTO 140 e NEW LINE. 


tador rapido apresentado no capitulo DELETADOR DE LINHAS RAPIDO, tendo 
em nSo usar o comando ou instrugSo RUN para n2o "apagar" os de 
senhos arquivados nas variaveis . 

Digite em seguida o programa em que queira usar os desenhos, in- 
serindo nos pontos em que os mesmos devem ser introduzidos as instru¬ 
sses que os buscam no arquivo das variaveis, ou sejam: PRINT A$, PRINT 
B$, PRINT C$ etc. 

Apresentamos a seguir um pequeno program exemplo para uma apli- 
cag3o curiosa do que foi explanado. 

Depois de ter "pintado" ou desenhado tres lindas telas e de ter 
deletado o programa desenhador, distraia-se um pouco aamirando suas o- 
bras de arte: 

Digite: 10 PRINT A$ 

20 FOR C=1 TO 50 
30 NEXT C 
40 CLS 
50 PRINT B$ 

60 FOR C=1 TO 50 
70 NEXT C 
80 CLS 
90 PRINT C$ 

100 FOR C=1 TO 50 
110 NEXT C 
120 CLS 
130 GOTO 10 

Tecle GOTO 10 e NEW LINE. NSC USE RUN PARA N&) DESIRUIR AS TELAS 
ARQUIVADAS . COmo sabemos, o comando RUN cancels todas as variaveis uti 
lizadas e as telas ficam arquivadas em variaveis alfanumericas. 

Se desejar conservar as telas, grave-as em fitas, acrescentando 
ao pequeno programa aciroa: 

140 SAVE ,k UlAS" 

150 GOTO 10 

Quando o gravador estiver acionado para gravar, faga o comando 
direto: 


Use o programa JOYSTICK DESENHADOR para fazer titulos e desenhos 
para aplicagSes em jogos. Estes poderSo se tomar muito mais interes- 
santes e movimentados com auxxlio do programa desenhador. 

0 programa desenhador podera ser modificado para produzir taniban 
- naturalmente atraves do tedado - textos para processamento, conjun¬ 
to ou nSo, pelo mesmo sistema. 

Apresentamos a seguir mais um desehho, feito com auxilio do pro¬ 
grama desenhador e baseado numa propaganda do proprio IK, tendo sido 
copiado diretamente do video pela unpressora: 
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EUFLICANDO PROGRAMAS FECHADOS 


lacionar e descrever todos, ja que cada un e uni caso particular e de- 
pende das peculiaridades de cada program. 


Um grande parte dos programs comerciais, se n3o a maioria, se- 
jam jogos ou utilitarios, e ,T protegida IT contra duplicagDes, com o in- 
tuito de evitar "pirataria". 

$3o programas dotados de artificios camuflados, os mais diversi- 
ficados, que os "fecham" ou "travam" de tal maneira que se toma impos 
slvel, em alguns casos, ate examinar sua listagem para fins de estudos 
ou curiosidade. Alguns, ao serem carregados da fita K-7 para o computa 
dor, ja saem "rodando", isto e, entrain imediatamente em execugSo, sen- 
do impossivel para-los com qualquer dos comandos disponiveis. S3o eli- 
minados da memoria do computador apenas se este e desligado. Outros, 
quando aceitam um BREAK ou um STOP, emperram, Tt v3o para o ar M , ou sim- 
plesmente deixam de funcionar se forem novamente acionados pelo coman- 
do RUN. Alguns voltam a rodar pelo comando GOTO, dependendo de se des- 
cobrir para onde mandar o comando, ms nSo s3o listados integralmente 
por forca de outros artificios. 

Enfim, uma serie infindavel de recursos e adotada por programdo 
res ou produtores com a finalidade de dificultar duplicagdes, copias e 
imitagOes faceis. 

Embora justificaveis, tais medidas acabam por prejudicar o usua- 
rio serio quando, por acidente ou em consequencia de qualquer problema 
no gravador, ou ainda por ocorrencia ulterior de defeito na fita, qual 
quer program de custo elevado se toma imprestavel, obrigando a um 
nova aquisigSo. Conscientes de tais possibilidades e visando minimiza- 
-las, alguns poucos produtores fomecem suas fitas com os programas du 
plamente gravados, um gravagao em cada lado da fita. 

Mas, se e infindavel a procura e adogSo de novos recursos para 
protegSo de programs, incansavel e a atividade de estudiosos e curio- 
sos em sentido contrario, isto e, visando "abrir" ou simplesmnte du- 
plicar can perfeigSo tais programs. Assim e que nuitos recursos tern 
sido descobertos e se tomam validos, sendo praticamente impossivel re 


Existem alguns, todavia, de carater "universal 1 *, que funcionam 
na quase totalidade dos programs e que s3o aqui publicados ccm final! 
dade didatica e ilustrativa, ficando sua utilizagSo sujeita a responsa 
bilidade de cada um. 

Um deles, nuito singles e eficiente, consiste em utilizer dire- 
ta, mas apenas parcialmente, a propria subrotina LOAD da memoria RCM * 
Seu enderego inicial e 832. 0 comando feito a partir do enderego 837 
permite "abrir" praticamente qualquer program. Os procedimentos a ado 
tar s3o os seguintes: 

1 - Por o microcomputador na modalidade FAST: 

Digite FAST e tecle NEW LINE. 

2 - Acionar a subrotina LOAD no ponto mencionado: 

Digite RAND USR 837 e tecle NEW LINE. 

3 - Acionar o gravador em PLAY com o program a ser carregado e 

acompanhar na TV os sinais caracteristicos de carregamento. 

Quando for canpletado o carregamento no conputador, aparecera no 
canto inferior esquerdo do video a notagSo C/0, que, n3o obstante ser 
C indicagSo de irregularidade - o que ocorre em decorrencia da subroti 
na ter sido acionada em ponto avangado em relagSo a seu enderego ini¬ 
cial - significa que o program foi carregado. 

4 - NSC TECIAR RUN OU LIST para rodar ou listar o program. Te- 

clar simplesmnte NEW LINE, o que devera fazer aparecer par¬ 
te da listagem, no minimo. 

Se, por feliz casualidade, encontrar-se nessa parte a linha que 
contenha a instrug^o SAVE, execute o passo a seguir, de nurtero 5. Caso 
contrario, tera que ser tentada sua localizagSo con auxilio do comando 
LIST, percorrendo sequencialmente o program ate a mesma ser localiza- 
da. Se o program n n2o for para o ar" ou n3o "emperrar". 
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5 - Acionar o gravador para gravar - REC e PLAY de preferen- 

cia com fita virgem. 

6 - Acionar em seguida o micro canputador . 

Digite GOTO xxx (xxx * n9 da Xinha da instrugao SAVE) e tecle 
NEW LINE. 

Logo surgirSo^no video os sinais caracteristicos do processo de 
gravagSo. Apos a mesm cample tar-se, o programs devera estar "rodando" 
no computador. Devera entSo ser acionada a tecla STOP do gravador e a 
dotado o procedimento normal com o canputador. 

Outro recurso cons is te nos seguintes procedimentos: 

1 - Baixar a KTP para o enderego 32753: 

Digite POKE 16388,241 e tecle NEW LINE. 

Digite POKE 16389,127 e tecle NEW LINE. 

Tecle NEW e em seguida NEW LINE. 

2 - Introduzir instrugSes acima da KIP que permitam a duplicagSo 

do program. As instrugQes s3o introduzidas at raves do pro¬ 
gram que se segue: 

Digite: 10 LET A$= n 0^03CDBB022C28FACD230PC3F502 ,T 

20 LET A=32753 

30 FOR Ol TO LEN A$-l STEP 2 
40 POKE A, 16*(C0DE A$(C)-28)+CODE A$(C+l)-28 
50 LETT A=A+1 
60 NEXT C 

Confira bon os codigos da linha 10 e o program. 

Tecle RUN e NEW LINE. Depois de aparecer a notagSo 0/0 no canto 
inferior esquerdo do video: 

Tecle NEW e NEW LINE. Apos aparecer o CURSOR K no canto inferior 
esquerdo do video: 


Ttecle FAST e NEW LINE e, an seguida: 

Digite RAND USR 32753 e tecle NEW LINE. 

3 - Acionar o gravador em PLAY com o program a ser duplicado. 
Logo surgir&o no video os sinais caracteristicos do processo LOAD. 

Quando for completado o carregamento do programa no canputador o 
video ficara mis escuro - acinzentado - sem qualquer notag3o. 

4 - Acionar o gravador para gravar - REC e PLAY -, de preferencia 
com fita virgem e de boa qualidade. 

5 - Pressionar em seguida qualquer tecla do microccmputador - me 
nos BREAK - e atentar para os sinais caracteristicos de gravagSo que 
surgir3o no video. Aguardar o termino do processo. Ao cessarem as lis 
tras no video devera surgir no tnesmo, no canto inferior esquerdo, a no 
tagao C/0. Acione ,a tecla STOP do gravador e proceda noxmaimente com 
o program no canputador. 

Observacgto: Urn program duplicado segundo este processo, ao ser 
feito seu carregamento para o canputador, entrara apenas listado e na 
nodalidade FAST, n3o obstante poder center a instrugSo RUN apos SAVE, 
apresentando-se o video acinzentado e sem qualquer notacSo. Bastara en 
tap teclar BREAK e em seguida SLOT. Una gravagSo normal podera ser fei 
ta, entao, a partir da instrugao SAVE do proprio program, para que, a 
partir dessa gravagSo, o mesiro entre rodando normlmente em SIXW apos 
o seu carregamento. 
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DUPLIGANDO PROGRAMAS ATRAVES DE DLOAD E DSAVE 


Como dissemos no inicio do capitulo anterior , em materia de pro- 
gramas "fechados" ou "protegidos" cada caso e urn caso. N5o obstante os 
recursos all expostos para se obter duplicagSes de tais programas se- 
rem considerados ,T infaliveis M por "experts", podem os mesmos esbarrar 
can alguns novos T, truques ,T que surjam, mais dificeis de serem desvenda 
dos- Por isso, apresentamos mais urn programa para a mesma finalidade, 
com recursos mais amplos e que introduzem duas novas fungOes do IK 85, 
Can a utilizagSo de tal programa e praticamente impossivel n2o conse- 
guir a duplicagSo de qualquer programs, por mais protegido que seja. 

0 programa utiliza as fungQes DLOAD e DSAVE, so recentenBnte im- 
plantadas no IK, a partir do modelo 85, can finalidades bastante abran 
gentes, especialmsnte em materia de processamento de arquivos . 

Atraves de DLOAD podemos colocar numa area reservada, praticamen 
te do tamanho da memoria RAM, qualquer programa que esteja dentro des- 
se limite, incluido nele as poucas instrugQes necessarias para a fina¬ 
lidade e os 'bytes” ocupados pelo arquivo de imagem do canputador. E a 
traves de DSAVE podemos recuperar o programa ali colocado, duplicado 
para funcionarrento normal. 

As instructs necessarias para essa finalidade ocupam, entre ou- 
tras, duas variaveis chamadas "reservadas", poraue especialmente defi- 
nidas para esse proposito, Z$ e Z, as quais, todavia, quando n3o utili 
zadas com as fungDes DLOAD e DSAVE, s5o usadas normalmente cocoo as de- 
mais do canputador. 

Estudar essas fungOes agora seria prematuro. Vamos apenas fazer 
um pequeno uso das mesmas, de form que fique demons trada sua enorme 
potencialidade. DLOAD se inicia no enderego 8305 e DSAVE no 8288, sen- 
do acessadas atraves do canando USR. 

Segue-se o pequeno programa com as instrugOes necessarias: 
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Digite: 10 DIM C$( 15000) (Em vez de 15000 podem ser apenas 

20 LET Z=0 os ’bytes" suficientes para rece 

30 LET Z$^"C" ber o programa a ser duplicado *7 

40 LET CMJSR 8305 

50 PRINT "CARREGAMENDO "; ,I K2ITD 11 AND NOT C; 

"FALBOU" AND C 
60 PAUSE 4E4 
70 LET C=USR 8288 

80 PRINT "C0PIA T, ; fl FEITA ,T AND NOT C;"FALH0U" AND C 

Obs.: AND (tecla 2) e NOT (tecla N) s2o comandos de ag3o indire- 
ta. Devem ser usados atraves das teclas proprias e n3o digitados letra 
por letra, 

Procedimentos: 

- coloque no gravador a fita can o programa a ser duplicado; 

- faga as ccqexOes EAR do micro e do gravador; 

- tecle RUN e NEW LINE; 

- acione a tecla FLAY do gravador; 

- espere aparecer no video "CARREGAMENIO FEITO", Se porventura a 
parecer "CAREEGAMENTO FALBOU", o processo deve ser reiniciado; 

- acione a tecla STOP do gravador; 

- tire a fita lida do gravador e coloque no mesmo uma fita, nova 
de preferencia; 

- faga as conex5es das toroadas MIC do micro e do computador; 

- acione as teclas REC e PLAY do gravador; 

- pressione qualquer tecla do computador, menos BREAK; 

- espere aparecer no video "0QPIA FEITA"; 

- se desejar mais de una copia do mesmo programa, deixe o grava¬ 
dor rodando em REC e PLAY, digite GOTO 70 e tecle NEW LINE no 
computador. 

Se o carregamento - DLOAD - foi efetuado can sucesso, e nuitissi 
mo pouco pravavel que ocorra qualquer falha em DSAVE, de maneira que a 
duplicagSo deve ter sido canpletada com absoluto sucesso, Todavia, se 
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ocorrer alguma falha na primeira tentativa, confira todos os itens do 
program e verifique se estao certas as posigdes dos controles de volu 
me e tom do gravador, quando for efetuar o carregamento do program a 
ser duplicado, na proxima tentativa, e certifique-se de que a conexSo 
entre o gravador e o microcomputador esteja bem feita atraves do cabo 
coaxial apropriado. 

Se o program a ser duplicado n3o for maior do que a area reser- 
vada na memoria do microcomputador, n2o podera haver falha. 
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Saber as quantidades de "bytes" usados ou disponiveis, por diver 
sas e ate muitas razSes, e uma imposig3o constante com que o programa- 
dor ou usuario de computador logo se defronta, decorrendo dai a neces- 
sidade de ter sempre em nente, ou facilmente acessiveis, dados que lhe 
pennitam faze-lo. 

Para saber a quantidade de "bytes": 

- DE UMA INSTRJjgSO OU PROGRAMS NA RAM: 

Digite: PRINT PEEK 16396+256*PEEK 16397-16509 

Tecle NEW LINE. 

- DE UM PRDGRAMA MAIS 0 ARQUIVO DE IMAS331: 

Digite: PRINT PEEK 1640CH-256*PEEK 16401-16509 

Tecle NEW LINE. 

- DE UM PROGRAMS, ARQUIVO 1$ IMAQSM E VARIAVEIS UTILIZADAS: 

Digite: PRINT PEEK 16404+256*PEEK 16405-16509 

Tecle NEW LINE. 

- DISPONIVEIS AIEM DA AREA OCUPADA (RAM DE 16 K "BYTES"): 

Digite: PRINT 32768-(FEEK 16404+256*PEEK 16405) 

Tecle NEW LINE. 

Se for rruito frequents a necessidade de ter qualquer dessas in- 
formagSes durante a digitagSo de um program longo, por exemplo, colo- 
que a instrugao adequada numa linha de program com numeragSo proxima 
do limite superior (o numero maximo de linhas no IK 85 e 9999 como sa- 
bemos): 
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9995 PRINT PEEK 16404+256*FEEK 16405-16509 


e toda vez que quiser a informagao correspondente, faga o eoraando inais 
singles e direto: 

GOTO 9995 e tecle NEW LINE* 

Se desejar, alem desse dado, saber com a mesma frequencia quanto 
resta de manSria utilizavel, acrescente: 

9996 PRINT 32768-(FEEK 16404+256*FEEK 16405-16509) 

Para tnelhor compreensao dos canandos acima, leia o capitulo ORGA 
NIZAQSO IE MEMORIA DO TK 85 E AS VARIAVEIS DO SISTEMA. 


m TESTE EFETXVO DA MEMORIA DO OCMPUTADOR 

As vezes acontece: quando se vai adiantado na digitagao trabalho 
sa de um program - e quando acontece geralmente e ccm um programa Ion 
go - de repente as coisas comegam a ficar confusas no video, linhas 
do programa saltam umas as outras, numeros e caracteres aparecem e de 
saparecem em turbilhao, a tela de TV fica acinzentada, a desordem impe 
ra e o programa T Vai para o ar", "some" das vistas nossas e do video. 

E al, tudo tem que ser comegado de novo e, mais uma vez, o pro¬ 
blem ocorre, causando-nos tremenda frustragao e aborrecimentos. 

Surgem as duvidas. Uma tecla pressionada indevidamente? 0 coman- 
do RUN acionado fora de tempo? Enfim, uma serie de indagagSes e feita 
e n2o se chega a nenhuma conclusao, simplesmente porque, rtuito prova- 
velmnte, podera ter ocorrido um desarranjo na memoria do computador. 
Por essa razao, sera sempre conveniente efetuar-se esporadicamente um 
teste de avaliagSo das condigCes da memoria do aparelho. 0 pequeno pro 
grama apresentado a seguir tem essa finalidade. 

Digite: 10 FAST 

20 LET A=193 
30 FOR Bp17550 TO 32700 
40 POKE E,A 
50 NEXT E 

60 FOR 017550 TO 32700 

70 IF PEEK C<>A THEN PRINT C,EEEK C 

80 NEXT C 

90 PRINT "TESTE FEITO" 


Tecle RUN e NEW LINE. Aguarde aproximadamente quatro minutos, du 
rante os quais a tela de TV ficara apenas acinzentada. 

Em silencio, o microcomputador estara fazendo um "checkup" minu- 
cioso em sua propria memoria, enderego por enderego. E logo informara, 
atraves da TV, seu diagnostico. 
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Decorrido o tempo mencionado, se aparecer no video somente a fra 
se TESTE FEITO, estara tudo em ordera com a memdria do computador- 

Todavia, se aparecerem numeros entre 17550 e 32700, seguidos de 
codigos diferentes de 193, e indica^So de que os endere?os ou lr bytes” 
correspondentes n3o estao funcionando perfeitamente, carecendo de afe 
rimento pelo departamento de assistencia tecnica do fabricante ou de 
serviQO tecnico autorizado. 

A variavel A da linha 20 do program n3o precisa necessariaroente 
ser defixiida com o valor 193 • Podera ser qualquer valor entre 0 e 255, 


PROGRAMAS 


Neste capitulo apresentaremos alguns programas, em listagens fei 
tas por impressora, os quais, alem da finalidade pratica - excegSo fei 
ta ao que se destina a entret enimen to - oferecan ao leitor usuario de 
microcanputador interessado em programagSo exoqplos de extensa e varia 
da gama de recursos aplicaveis em computag&o, atraves dos quais Sclo ob 
tidos os mais diversos resultados e efeitos. 

Os seguintes programas ser§o apresentados: 

- GRAFIGO OOMPARAXIVO EE VENDAS. 

- CADASIRO DE LIVROS. 

- 00OTR0LE DE ESTOQUE. 

- PROGRAMAS FffiANCEIROS, 

- BATALHA AR E MAR* 

As listagens dos mesmos ser3o precedidas de um ou mais quadros 
de video produzidos pelo program respectivo, seja um grafico estatis- 
tico, um , \nenu M ou uma apresentag3o, de forma a tomar t2o inteligivel 
quanto possivel cada um. 

Depois de digitados e gravados em fita K-7 atraves das respecti- 
vas instrugSes SAVE, ao serem carregados da fita para o ndcroccmputa- 
dor os programas entrarSo 1 'rodando' 1 , tomando-se auto-explicativos a- 
traves da apresentagSo ou do ''menu", automat icamente introduzidos por 
eles proprios. 

Recomendamos ao programador principiante interessado que estude 
detidamente cada program, etapa por etapa, a fim de colher nos mesmos 
os exemplos de comandos e instrugOes que possam ajuda-lo em suas pro- 
prias programgSes. 
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mOGRAMAS FINANCEIRDS 


A listagexn apresentada a seguir reune os cinco pequenos progra¬ 
ms apresentados no capitulo FRDGRAMAS FINANCEIRDS e reflete a aplica- 
c3o das recomendagOes feitas no capitulo HANIFUIANEX) DIVERSOS FRDGRA¬ 
MAS A UM SO TEMPO. 

A apresentagSo final do agrupamento e feita com o fim de toma- 
-lo prontamente acessivel ao lei tor praticante, caso o mesne encontre 
alguma dificuldade ao faze-lo conforme recomendado. 
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810 RETURN 
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DICAS PRAEICAS 


PADRONIZAgSD MDNETARIA 

1 - Ate cinco digitos de entrada, com mais ate tres decimais ou 

sem decimals: 

10 INPUT A 

20 LET A$=STR$ (A+.001) 

30 PRINT A$ ( TO LEN A$-l) 

2 - Ate oito digitos de entrada, sendo cortados os decimals. Aci 

ma de oito digitos ocorre arredondamento do oitavo, sendo os 
demais apresentados cano zeros (0). 

10 INPUT A 
20 LET A$=STR$ A 
30 FOR C=1 TQ LEN A$ 

40 IF A$(C) THEN NEXT C 
50 PRINT A$ ( TO C-l) 
ou 50 PRINT A$ ( TO C-l)+",00" 

3 - Ate treze digitos de entrada, com ou sem decimals: 

10 INPUT A 

20 LET A$=STR$ (A+.0001) 

30 FOR C=1 TO LEN A$ 

40 IF A$(C)<>"." THEN NEXT C 

50 IF (C+1)>I£N A$ THEN LET A$=A$+".000" 

60 IF (C+2)>LEN A$ THEN LET A$=A$+ ,, 00" 

70 IF (C+3)>LEN A$ THEN LET A$=A$+"0" 

80 PRINT A$ ( TO C+3) . 
ou 80 PRINT A$ ( TO C+3)+",00" 

Obs. : O TK 85 usa no maximo treze (13) espagos para escrever um 
numero, mas fomece apenas os oito primeiros digitos signi 
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ficativos como resultado de operacSes matematicas. Numeros com 
catorze (14) ou mais digitos sAo representados em notagSo cienti 
fica, con p nas calculadoras cientificas de bolso. Experimente as 
seguintes operagOes: 

PRINT 12345678*123456 (= 1524148000000) 

PRINT 12345678*1234567 (= 1.5241567E+13) 

E+13 no resultado da segunda operagSo indica que o resultado cor 
reto da operagao sera obtido nultiplicando-se 1.5241567 por 10 e 
levado a decima terceira (13§) potencia, portanto resultando um 
nunero de 14 digitos, que n3o pode ser impresso pelo mcrocompu- 
tador: 15241567000000. 

ESCRTEA VERTICAL 

1 - De mna palavra com ate 22 caracteres: 

10 DIM A$( 1,22) 

20 INPUT A$(l) 

30 FCE C=1 TO 22 
40 PRINT AT C-l ,0;A$( 1 ,C) 

50 NEXT C 

Para imprimir em video inverso, acrescente: 

15 PGffi 16390, 116 e tecle NEW LINE duas vezes apos 
digitar a palavra. 

2 - De um texto corrido ou diversos titulos ou palavras avulsas: 

10 LET 0=0 
20 LET L=0 
30 INPUT A$ 

40 FOR V=1 TO LEN A$ 

50 IF PEEK 16442=2 THEN GOSUB 150 
60 IF C=32 THEN GOSUB 200 
70 PRINT AT L,C;A$(V) 

80 1£T L=L+1 
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90 NEXT V 
100 LET 002 
110 GOTO 20 
150 LET 002 
160 LET LfO 
170 RETURN 
200 LET 0=0 
210 LET L=0 
220 CLS 
230 RETURN 


CENIRALIZAgSD EE UTOLOS 

10 INPUT A$ 

20 LET A=LEN A$/2 
30 PRINT TAB 16-A;A$ 

Ou, can video inverso: 

10 POKE 16390,116 
20 INPUT A$ 

X PRINT TAB 16-LEN A$/2;A$ 

Tecle NEW LINE duas vezes apos digitar a palavra. 

TITULO EM SCROLL 
10 LET A$= HHp? 


20 PRINT AT 19,8;A$ 

30 FOR C=1 TO 100 
40 NEXT C 
50 FOR C=1 TO 19 
60 SCROLL 
70 NEXT C 
80 GOTO 10 

DESTAQUE EE TITULOS 
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10 INPUT A$ 

20 FOR A=1 TO 5 
X PRINT AT 10,16-LEN A$/2;A$ 

40 FOR 0=1 TO LEN A$ 

X LET B$^HR$ (CODE A$(C)+128) 

60 PRINT AT 10,16-LEN A$/2+C-l;B$ 
70 NEXT C 
X NEXT A 


INVERSSD IE PALAVRAS OU NUMERDS 

10 INPUT A$ 

20 PRINT A$ 

30 FOR C=LEN A$ TO 1 STEP -1 
40 PRINT A$(C); 

X NEXT C 


ENCOLUNAMENTO IE NUMERDS PELA DIREITA 
10 INPUT A 

20 PRINT TAB 32-LEN SIR$ A;A 

ALINHAMENTO IE PALAVRAS PELA DIREITA 
10 INPUT A$ 

X PRINT TAB 32-LEN A$:A$ 


RESERVANDO ESPAgO EM LINHA REM 

1 - At£ 255 espagos: 

1 REM .. NEW LINE 

POKE 16514,255 NEW LINE 

POKE 16515,0 NEW LINE 

RAND USR 8192 NEW LINE 

NEW LINE 

2 - 256 ou mais espagos: 


189 




256: 

1 REM .. 

l®? LINE 


POKE 16514,0 

NEW LINE 


POKE 16515,1 

NEW LINE 


RAND USR 8192 
NEW LINE 

NEW LINE 

300 

1 RIM .. 

NEW LINE 


POKE 16514,44 

NEW LINE 


POKE 16515,1 

NEW LINE 


RAND USR 8192 
NEW LINE 

NEW LINE 

550 

1 REM .. 

NEW LINE 


POKE 16514,38 

NEW LINE 


POKE 16515,2 

NEW LINE 


RAND USR 8192 
NEW LINE 

NEW LINE 
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TK85 - DOMINIO RAPIDO 


Nelson Casari 


Este livro proporciona ao usuario de microcomputadores da linha 
Sinclair, em especial do TK 85 e do CP 200 S, uma aprendizagem 
agradavei e segura. 



Trata-se de um manual pratico e de facil consulta, constitufdo de 
informacoes, dados, tabelas, programas e "dicas" de acesso rapido, 
que permite o dommio adequado dos recursos do equipamento 
dispom'vet. 

Pretende-se colocar ao alcance do leitor os elementos que o auxi- 
liem a dominar mais rapidamente seu aparelho, possibilitando-lhe 
ampla utilizacao em espaco de tempo mais curto possivel. 


APLICACAO 

M 

Manual destinado aos usuarios de microcomputadores da linha 
Sinclair, em especial do TK 85 e do CP 200 S. Complementa o Manual 
do Fabricante, permitindo a utilizacao mais intensiva dos recursos 
desses equipamentos. Recomendado para o desenvolvimerito de cur- 
sos de treinamervto. 


i 


publicaccia ntlnx 



